1.) дано трехзначное число. определить, какая из его цифр больше: a. первая или вторая; b. вторая или последняя.

raya323 raya323    3   28.03.2019 05:10    5

Ответы
трнвчполт755 трнвчполт755  26.05.2020 21:43

a)

Program Pr1;
uses crt;
var a,b,c:integer;
Begin
clrscr;
readln(a);
c:=a mod 10;
a:=a div 10;
b:=a mod 10;
a:=a div 10;
if a>b then writeln('Первая цифра >')
else writeln('Вторая цифра больше');
end.

b)

Program Pr1;
uses crt;
var a,b,c:integer;
Begin
clrscr;
readln(a);
c:=a mod 10;
a:=a div 10;
b:=a mod 10;
a:=a div 10;
if b>c then writeln('Вторая цифра >')
else writeln('Третья цифра больше');
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика