Ответы на вопрос:
Если речь о цикле, то 2 вариант
Объяснение:
Что тут может быть не понятно? :)
№1 var x: integer; begin writeln('введите четырехзначное число'); read(x); x: =x mod 10*1000+x div 100 mod 10*100+x div 10 mod 10*10+x div 1000; writeln('число после перестановки 1-й и 4-й цифры = ',x); end. №2var x: integer; begin writeln('введите четырехзначное число'); read(x); x: =x div 1000*100+x div 10 mod 10*10+x mod 10; writeln(x); end.
Популярно: Информатика
-
alibekovberkut27.06.2022 12:50
-
buzovkina8110.04.2023 06:35
-
Собакамаилру08.04.2022 20:07
-
Katpo02.04.2020 03:21
-
таня64726.01.2022 14:35
-
Dmitry32112302.06.2022 10:11
-
galina725701.06.2023 19:28
-
polinfasdfg05.02.2023 06:49
-
Itupoypomogite104.01.2020 14:27
-
Алинур1312.08.2021 00:21