"Составьте программу, которая получает "перевертыш" трехзначного числа "а". Значение "а"...

Question

"Составьте программу, которая получает "перевертыш" трехзначного числа "а". Значение "а" введите с клавиатуры." Домашка в Pascal ABC

Answer 1

uses crt;
var
a,i:integer;
st,tmp:string;
begin
read(a);
st:=inttostr(a);
for i:=length(st) downto 1 do
tmp:=tmp+st[i];
write(tmp);
end.