Ввести с клавиатуры вещественное число. Напечатать в обратном порядке цифры, составляющие это число. Десятичную точку не печатать. Язык программирования - PascalAbc.

Question

Информатика

Таймур

1 июля, 14:02

Ввести с клавиатуры вещественное число. Напечатать в обратном порядке цифры, составляющие это число. Десятичную точку не печатать. Язык программирования - PascalAbc.

+5

Ответы (1)

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

Ладислав · Answer 1

Program zz;

var a:integer;

begin

Writeln ('Введите число:') ;

readln (a) ;

write ('Число в обратном порядке:') ;

while (a0) do begin

write (a mod 10) ;

a:=a div 10;

end;

end.