Предмет: Информатика,
автор: devcenkis56
Дано двузначное натуральное число. Если число десятков в нём больше числа
единиц, то вывести слово «ДА», в противном случае – «НЕТ».
Написать программу на языке Паскаль. использовать div и mod
СРООЧНО! ДАЮ УЖЕ 25 БАЛЛОВ,В НАДЕЖДЕ НА ПРАВИЛЬНУЮ ПОМОЩЬ! ОЧЕНЬ ВАЖНО
Ответы
Автор ответа:
1
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.
Похожие вопросы
Предмет: Русский язык,
автор: egorovaelena2
Предмет: Русский язык,
автор: Аполошка
Предмет: Русский язык,
автор: sashakulikova
Предмет: Литература,
автор: Мордэкай02
Предмет: Физика,
автор: sapolinariyame2564