Question

(Паскль)Составьте программу выполняющую расчет площади треугольника

Answer 1

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