Опубликовано 12.06.2017 по предмету Информатика от Гость >> <<

Дан треугольник с основанием A и высотой H. Найдите площадь. ( написать программу )

Ответ оставил Гость

Var a,h,s:real;
begin
Write(Основание треугольника: ); read(a);
Write(Высота треугольника: ); read(h);
s:=(a*h)/2;
Writeln(Площадь равна ,s);
end.