Ответы на вопрос:
Var a,b,c: integer; begin write('введите числа a,b,c: '); readln(a,b,c); if(a+b> 0)or(b+c> 0)or(a+c> 0) then writeln('обнаружена положительная сумма! ') else writeln('положительной суммы не обнаружено.'); readln; end.
Популярно: Информатика
-
Nematzoda199903.04.2023 18:05
-
ritikdf34506.06.2020 03:06
-
xxxxxxxxxxxxxxx22808.04.2022 05:33
-
dextomethorphah30.06.2023 13:20
-
nikolau2011mil05.01.2020 11:32
-
sher123452806.01.2021 05:20
-
Анoнuм30.03.2023 16:06
-
Катюшкавасилек02.07.2020 10:56
-
даша8919473316419.10.2021 21:58
-
darinchiiik19.08.2022 00:00