Составте блок схему begin var (a,b):=readreal2('Введите стороны :'); var...

Question

Составте блок схему
begin
var (a,b):=readreal2('Введите стороны :');
var (c,d):=readreal2('Введите основания :');
var h:=readreal('Введите высоту :');
var S:=((c+d)/2)*h;
writeln('S=',S);
var P:=a+b+c+d;
writeln('P=',P);
end.

Answer 1

Не благодари димаста

---

Comments

Спасибо бро