Регистрация
afdsfdsafdsfdsf
14.03.2020 16:38
Информатика
Есть ответ 👍

Сделайте короткий конспект О понятии информации

270
419
Посмотреть ответы 1

Ответы на вопрос:

milanapil
milanapil
4,5(9 оценок)

  pascal

program abc;

var a,b,c: integer;

s,p: real;

begin

readln (a,b,c);

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

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

writeln ('s= ',s);

end.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

Популярно: Информатика