Найти площадь треугольника с помощью Pascal.

Question

Информатика

Варвара

9 мая, 22:33

Найти площадь треугольника с помощью Pascal.

+2

Ответы (1)

Знаете ответ на вопрос?

Сарра · Answer 1

Program Trykutnyk;

uses Crt;

const a=5; b=3.6; c=4.2;

var p, s: real;

begin

clrscr;

p:=a+b+c;

writeln ('p=', p:5:2) ;

p:=p/2;

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

writeln ('s=', s:5:2) ;

writeln ('Имя Фамилия') ;

readln

end.