
Tivenokos
5 год назад
Пожалуйста, Пожалуйста посчитайте с решением 7 ой задачи. Программу нужно написать в Паскале.

ОТВЕТЫ

Winter Silvia
Oct 24, 2020
USES crt;VAR a,b,c: integer;begincls;repeatWRITE('Введите двухзначное число: '); READLN (a);until (a>=10)and(a<=99);b:=a div 10;c:=a mod 10;if b>c then writeln ('Первая цифра больше.');if b<c then writeln ('Вторая цифра больше.');if b=c then writeln ('Первая и вторая цифры равны.');END.
456
Смежные вопросы: