С1) введите с клавиатуры 3 числа если они больше 10 то выводим слово успех иначе провал 2) генерируйте число от 10 до 99 если оно четное и больше 75 то вывести на экран сумму его чисел иначе разность
216
257
Ответы на вопрос:
Var a,b,c: real; begin write('введите три числа: '); readln(a,b,c); if (a> 10)and(b> 10)and(c> 10) then writeln('успех') else writeln('провал'); end. var a: integer; begin randomize; a: =random(90)+10; writeln('исходное число: ',a); if (a mod 2 = 0)and(a > 75) then write('сумма его цифр: ',a div 10 + a mod 10) else writeln('разность его цифр: ',a div 10 - a mod 10) end.
Популярно: Информатика
-
AlinaFlowers06.09.2022 09:00
-
Нонэйм230.03.2022 04:23
-
olesyavod4518.03.2021 20:58
-
irinamotorueva18.12.2021 08:29
-
EeeeeeeROOOCK29.06.2022 03:56
-
Kkuzbekova21.05.2023 18:36
-
NoNameKek1Himka16.06.2023 09:47
-
evaeva200601.01.2022 05:01
-
Rоmаn84402.09.2022 22:05
-
Bananchik2608.11.2022 04:04