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

Question

Информатика

Зиёда

17 мая, 11:38

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

+1

Ответы (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.