Дано натуральное число. Записать число, записанное теми же цифрами, но в обратном порядке. Подсказка последовательно отделяемое каждую цифру, потом ее значение прибавляем к переменной s, умноженной на 10.
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
program perevod;
uses crt;
var
a,i,error:integer;
s,d:string;
begin
write('Введите число: ');
readln(a);
str(a,s);
for i:=1 to length(s) do d:=s[i]+d;
val (d,a,error);
write('Ответ: ',a);
end.