Информатика , решить через паскаль ​

0 голосов
8 просмотров

Информатика , решить через паскаль ​


image

Информатика (26 баллов) | 8 просмотров
Дан 1 ответ
0 голосов

Ответ:

1)

program Triangle;

var a, b, c:integer;

var p, s: double;

begin

   Readln(a);

   Readln(b);

   Readln(c);

   p := (a+b+c)/2;

   s := sqrt(p*(p-a)*(p-b)*(p-c));

   Writeln(s:4:2);

end.

(138 баллов)
0

2) знаешь?