Предмет: Информатика, автор: perry

. Определите число, полученное выписыванием в обратном порядке цифр заданного целого трёхзначного числа.

Ответы

Автор ответа: PopCop312
0
var
  a:integer;

begin
  read(a);
  while(a <> 0) do 
  begin
    write(a mod 10);
    a := a div 10;
  end;
end.
Похожие вопросы
Предмет: Алгебра, автор: Nikera2006