дано пятизначное число Найти число, полученное при прочтении его цифр справа налево.

Question

Информатика

Евдений

22 ноября, 23:07

дано пятизначное число Найти число, полученное при прочтении его цифр справа налево.

+2

Ответы (1)

Знаете ответ?

Меркурий · Answer 1

Program naoborot;

Uses crt;

var n, a, b:integer;

Begin

ClrScr;

write ('введите натуральное число: ') ;

readLn (X) ;

N:=X;

while N>=1 do

begin

a:=N mod 10;

N:=N div 10;

b:=b*10+a;

end;

write ('Прочтение цифр числа справа налево: ', b)

End.