Question

программа в паскаль. если знаете как решить хоть одно- напишите

Answer 1

Ответ:

begin

 var N: word;

 write('Введите число: '); read(N);

 var S:=N.ToString;

 //2.1

 writeln('Является ли число "перевёртышем?": ',(S=S.Inverse)? 'да':'нет');

 //2.2

 write('Есть ли одинаковые цифры: ',((S[1]=S[2]) or (S[2]=S[3]) or (S[1]=S[3]))? 'да':'нет');

end.

Примечание:

Так и не смог понять, где тут надо было использовать деление числа

89ad0ba9dcfb3f43ac2a3a63f4e992b1.pas