Написать программу которая задумывает число и печатает его наоборот. (пример: 341 и 143) в паскаль.

Question

Информатика

Арсеня

24 июня, 00:30

Написать программу которая задумывает число и печатает его наоборот. (пример: 341 и 143) в паскаль.

+4

Ответы (2)

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

Коляня · Answer 1

A: = random (500)

Как перевернуть хз

Лукинична · Answer 2

var m, p:longint;

i:integer;

begin

writeln ('Введите натуральное число не более 999999999') ;

repeat

readln (m) ;

until (m>0) and (m<=999999999) ;

p:=0;

while m>0 do

begin

i:=m mod 10;

p:=p*10+i;

m:=m div 10;

end; write (p) ;

readln

end.