Продолжи список свойств объектов: предмет : "имеет имя", " имеет форму"; явление: "имеет имя"; событие:
281
338
Ответы на вопрос:
Var n, n1, n2, n3: integer; begin write('введите трехзначное число: '); readln(n); if not ((n > = 100 ) and (n < = 999)) then writeln('не верный вводд числа') else begin n1 : = n div 100; n2 : = n div 10 mod 10; n3 : = n mod 10; writeln('1 - ', n3, n2, n1); writeln('2 - ', n3, n1, n2); writeln('3 - ', n2, n1, n3); end; end.
Популярно: Информатика
-
diniska328.07.2020 09:14
-
tanyakozina0014.05.2020 18:45
-
nellit0313.12.2022 05:30
-
mallaya0112.07.2021 12:11
-
Clook202313.11.2021 10:23
-
nastya345457833567815.11.2022 03:15
-
Wolceme28.08.2021 09:15
-
JuliaFlar06.12.2020 21:10
-
DemonOfFood06.09.2022 17:16
-
prosto529709.01.2023 19:28