Помогите пожалуйста!!! Составьте программу для вычисления площади прямоугольника и треугольника, если a=220, b=250, h=10.
Var a,b,h:integer;begin writeln('Введите a,b,h'); readln(a,b,h); writeln('Площадь прямоугольника=',a*b); writeln('Площадь треугольника=',a*h div 2);end.
var a,b,h:integer; begin writeln('Введите a,b,h'); readln(a,b,h); writeln('Площадь прямоугольника=',a*b); writeln('Площадь треугольника=',a*h div 2); end.