Дано целое двузначное число, определить, равны ли - вопрос №8896880 от Kso57 17.07.2021 00:17

Question

Информатика: Дано целое двузначное число, определить, равны ли его цифры или нет. на языке паскаль.

Kso57 · Answer

program HelloWorld;

var S: integer;

begin

writeln('Введите число двухзначное:');

readln(S);

if(s mod 10 = s div 10) then writeln('Числа равны!')

else writeln('УВЫ! Числа не равны!')

end.