Задать вопрос
13 июля, 01:27

Дано четырехзначное число. Если число десятков больше чем число единиц то вывести 0 иначе 1.

+3
Ответы (1)
  1. 13 июля, 03:01
    0
    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.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Дано четырехзначное число. Если число десятков больше чем число единиц то вывести 0 иначе 1. ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы