Pascal abc Как написать формулу площади? 1/2*h*(a+b)
Pascal abc Как написать формулу площади? 1/2*h*(a+b)
Гость
Ответ(ы) на вопрос:
Гостьvar
a, b, s, h :real;
begin
s:= (a+b)*h/2;
end.
Гостьvar a,b,h:integer;
s:real;
begin
writeln('Введите h');
readln(h);
writeln('Введите a');
readln(a);
writeln('Введите b');
readln(b);
s:=1/2*h*(a+b);
writeln('Площадь равна:',s);
end.
Не нашли ответ?
Похожие вопросы