Дано четырехзначное число. Если число десятков больше чем число единиц то вывести 0 иначе 1.
Дано четырехзначное число. Если число десятков больше чем число единиц то вывести 0 иначе 1.
Гость
Ответ(ы) на вопрос:
Гостьvar n:integer;
begin;
readln(n);
if (n mod 100-n mod 10) div 10>n mod 10 then writeln('0') else writeln('1');
end.
Не нашли ответ?
Похожие вопросы