Ответы на вопрос:
1. 10 2. 12 3. 3 4. 22 5. 15 6. 34 7. 3 часть 2 1. var n: integer; begin write('введи число '); readln(n); if (n mod 2) = 0 then write(n,' чётное) else write(n,' нечётное); end. 2. var a,b: integer; begin write('введи числа '); readln(a,b); if a> b then begin write('a = ',b*a,' b = ',a+b) else write('a = ',a+b,' b = ',a*b); end. 3. var n: integer; begin write('введи двузначное число '); readln(n); if ((n div 10) = 6) or ((n mod 10) = 6) then write('6 присутствует') else write('6 нет в этом числе'); end.
Популярно: Информатика
-
annakivilyova21.07.2020 22:25
-
strashilev20.01.2021 04:40
-
nanakiriya04.01.2022 02:17
-
Bezzybka21.03.2021 16:28
-
gregsorvenkov04.01.2021 06:53
-
Ira01903.11.2020 08:33
-
Veronika69101.07.2020 20:06
-
asadbek770308.05.2021 16:22
-
alinka1215200221.10.2020 06:46
-
Po99909.03.2022 22:38