Предмет: Информатика,
автор: Аноним
Составить программу, которая меняет у пяти любых чисел, вводимых с
клавиатуры, порядок следования цифр в числе на обратный, используя подпрограмму процедура
Ответы
Автор ответа:
0
var
n:integer;
begin
repeat
write('N = '); readln(n);
until (n>=100) and (n<=999);
writeln('Было введено число - ',n);
writeln('_________________________');
writeln('Младшая цифра - ',n mod 10);
writeln('Средняя цифра - ',n div 10 mod 10);
writeln('Старшая цифра - ',n div 100);
writeln('_________________________');
writeln('Перевёрнутое число - ',n mod 10,n div 10 mod 10,n div 100);
end.
1
Объяснение:
Похожие вопросы
Предмет: Русский язык,
автор: LION7007
Предмет: Русский язык,
автор: lyazaika
Предмет: Русский язык,
автор: murom5ru
Предмет: Алгебра,
автор: имммм1