Сделать из числа 123 число 312 в pascal

Question

Информатика

Володюха

1 апреля, 19:50

Сделать из числа 123 число 312 в pascal

+4

Ответы (1)

Знаете ответ на вопрос?

Федюся · Answer 1

ИЗИ

var

N1, N2 : Word;

begin

Write ('Введите число: ') ; ReadLn (N1) ;

N2 : = 0; while N1 > 0 do begin N2 : = N2 * 10 + N1 mod 10; N1 : = N1 div 10; end;

WriteLn ('Перевёрнутый результат: ', N2) ;

end.