Дано трёхзначное число.найти число полученное при прочтение его цифр справа налево ( фото с flowgorithma

Юлья0000000 Юлья0000000    2   24.09.2019 07:40    2

Ответы
LollyOgry LollyOgry  08.10.2020 14:28
Var a:integer;
begin
write('Введите число: ');
readln(a);
if a<0 then write ('-');
while a<>0 do
begin
write (abs (a mod 10));
a:=a div 10
end
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика