составить программу вычисления площади равнобедренного треугольника. S=1/2 hl, 1-основание h-высота.

2

Ответы и объяснения

2012-12-19T15:28:26+00:00

var h,l,a:real;

begin

writeln('введите высоту и основание треугольника в см');

read(h,l);

a:=h*l/2;

writeln(a);

end.

 

 

текст можешь сам изменить

2012-12-19T15:29:02+00:00

uses crt;

var s, h: integer;

BEGIN

ClrScr;

readln(h, l);

s:= 1/2*(h*l);

writeln(s);

readln;

END.