Найти площадь равнобедренного треугольника зная высоту и основание по программе паскаль а б с(значения высоты и основания любые)
Var h,b,s:real; begin write('Введите основание = '); readln(b); write('Введите высоту = '); readln(h); s:=0.5*b*h; writeln('Площадь треугольника = ',s:6:2); end.
кто нарушения отмечает
пожалуйста решите мою задачку.Мне срочно нужно!!!!