Составить программу паскаль: состоит ли двухзначное число из одинаковых цифр

193

484

Посмотреть ответы 2

Ответы на вопрос:

Molyaa97

Информатика

4,8(93 оценок)

Var x: integer; begin write('введите двузначное число'); readln(x); if (x mod 10) = (x div 10) then writeln('число ',x,' состоит из одинаковых цифр') else writeln('число ',x,' состоит из разных цифр'); end.