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

Question

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

zverrodion199911 · Answer

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....