Дано трехзначное число. Найти число, полученное - вопрос №12681011 от anas20041006 12.01.2021 10:22

Question

Другие предметы: Дано трехзначное число. Найти число, полученное при прочтении его цифр справа налево. (123 321) (программа Паскаль)

anas20041006 · Answer

Program z8;
Var n, a1, a2, a3, n1: Integer;
Begin
Writeln (‘Введи число’);
Readln (n);
a1:= n div 100 ;
a2:= n div 10 mod 10;
a3:= n mod 10;
n1:= a3*100+ a2*10+a1;
Writeln (‘новое число’, n1);
Readln;
End