Вычислить площадь треугольника
Pascal ABC
program pl;
var a,h,s:real;
begin
cls;
write(Введите основание и высоту труеглольника );
readln(a,h);
S:=a/2*h;
write(площадь треугольника равна ,S);
end.
Вроде так, если вам нужна программа
Оцени ответ
