Ответы на вопрос:
Var n,n1,n2: integer; begin write('введите целое двухзначное число: '); readln(n); n1: =(n div 10)+1; if n1=10 then n1: =0; n2: =(n mod 10)-1; if n2=-1 then n2: =9; writeln('результат: ',n1,n2) end. тестовое решение: введите целое двухзначное число: 38 результат: 47 введите целое двухзначное число: 90 результат: 09
Популярно: Информатика
-
sagizovtoshtemi20.03.2021 03:13
-
missisruso27.06.2023 10:36
-
sogoyantigran28.04.2023 02:18
-
vsevolod201311.08.2022 13:07
-
dima20075624.08.2020 13:22
-
Mahaeva3314.07.2020 12:29
-
автормемовв15.12.2022 08:25
-
Aizere111123.10.2020 05:49
-
ahkmedchaush025.08.2020 08:51
-
nastya23rwa16.05.2023 02:10