Дано двузначное натуральное число. Если число десятков в нём больше числа
единиц, то вывести слово «ДА», в противном случае – «НЕТ».
Написать программу на языке Паскаль. использовать div и В НАДЕЖДЕ НА ПРАВИЛЬНУЮ ОЧЕНЬ ВАЖНО

Zashas1 Zashas1    3   18.04.2020 18:55    1

Ответы
Kekit Kekit  13.10.2020 11:34

program raize;

var

x,d,e :integer;

 begin

readln(x);

e := x mod 10;

x := x div 10;

d := x mod 10;

if d >e then

 write('Да!')

else

 write('Нет!')

 end.

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