Ответы на вопрос:
Var a,b,c,p: real; begin writeln('введите длины сторон треугольника: '); write('a = '); read(a); write('b = '); read(b); write('c = '); read(c); p: =(a+b+c)/2; writeln('площадь треугольника: ', sqrt(p*(p-a)*(p-b)*(p-c)): 4: 4); end.
Популярно: Информатика
-
angelina2334e35r511.06.2021 19:08
-
Мороженка111111112.08.2021 02:20
-
Машаrobotg05.07.2020 15:50
-
islamovkasymzh129.09.2020 05:58
-
ржакаmaker18.02.2020 13:11
-
potapovp01624.10.2021 08:29
-
Violetta71103.02.2022 12:20
-
rmaro8213.06.2022 06:59
-
caesarkung06.09.2021 15:33
-
Kaishuudee27.04.2022 19:27