Предмет: Информатика,
автор: perry
. Определите число, полученное выписыванием в обратном порядке цифр заданного целого трёхзначного числа.
Ответы
Автор ответа:
0
var
a:integer;
begin
read(a);
while(a <> 0) do
begin
write(a mod 10);
a := a div 10;
end;
end.
a:integer;
begin
read(a);
while(a <> 0) do
begin
write(a mod 10);
a := a div 10;
end;
end.
Похожие вопросы
Предмет: История,
автор: diasmukusev9
Предмет: Алгебра,
автор: Nikera2006
Предмет: Математика,
автор: mezenova2000
Предмет: Математика,
автор: Leonhic