Question

Паскаль. Составить программу вычисления площади треугольника S=1/2ah

Answer 1

program pl;
var a,h,s:real;
begin
writeln ('введите длину стороны треугольника а');
readln (a);
writeln ('введите длину высоты треуг. h');
readln (h);
s:=1/2*a*h;
writeln('площадь треугольника с заданными параметрами=',s,' кв.ед.');
end.