Ответы на вопрос:
Program al; var a,b,c: integer; s,p: real; begin writeln('vvedite a='); readln(a); writeln('b='); readln(b); writeln('c='); readln(c); p: =(a+b+c)/2; s: = sqrt(p*(p-a)*(p-b)*(p-c)); writeln('s=',s); readln; end.
Популярно: Информатика
-
bilkosha200505.09.2020 20:10
-
Никитосик345610.09.2020 01:24
-
xokkey122.09.2021 02:18
-
Viktoria1234567890103.03.2023 01:42
-
Sanya05531.07.2021 06:02
-
Tuchka08708.07.2020 17:17
-
Варчай0625.10.2022 06:34
-
Happyunicorn2810.01.2023 09:15
-
gameplay13517.04.2020 21:40
-
alinkamalinka49924.10.2022 18:24