Создайте программу на pascalabc, используя if then для рачета полупериметра треугольника (a+b+c)/2. если a< > 0 и т.д. и a+b> c и т.д.
187
344
Ответы на вопрос:
Var a,b,c: real; begin readln(a,b,c); if (a< > 0) and (a+b> c) then writeln ((a+b+c)/2) else writeln('неверные входные значения'); end.
Популярно: Информатика
-
ViktoriaDog200602.05.2020 11:52
-
Всеникизаняты1122.03.2021 01:49
-
Валерия11111221lera05.04.2020 23:40
-
loon148816.04.2020 12:57
-
Den222821.02.2023 19:19
-
anton27030.06.2020 14:16
-
Natusik0429.08.2021 18:08
-
alexa702126.05.2023 07:43
-
suyargklova21.04.2021 16:16
-
Romizn08.06.2022 01:17