Дано натуральное число. Записать число, записанное теми же цифрами, но в обратном...

0 голосов
41 просмотров

Дано натуральное число. Записать число, записанное теми же цифрами, но в обратном порядке. Подсказка последовательно отделяемое каждую цифру, потом ее значение прибавляем к переменной s, умноженной на 10.


Информатика (31 баллов) | 41 просмотров
0

На каком языке?

Дан 1 ответ
0 голосов

Pascal ABC

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.


(434 баллов)