Вывести число, полученное при прочтении исходного числа справа налево - Turbo Pascal
Формулировка задачи:
Дано трехзначное число. Вывести число, полученное при прочтении исходного числа справа налево.
556
655
заранее спасибо...
Решение задачи: «Вывести число, полученное при прочтении исходного числа справа налево»
textual
Листинг программы
var
n: integer;
begin
write('vvedite chilo: ');
repeat
readln(n);
until (n>=100)and(n<=999);
writeln('chilo naoborot:');
write(n mod 10);
write(n div 10 mod 10);
write(n div 100);
readln;
end.