сделать блок-схему алгоритма Program Задание_2;
var
a, b: real;
c, s: real;

begin
a:=4;
b:=16;
c:=(40-(a+b))/2;
s:=c*Sqrt(a*b);
writeln ('Площадь является ',s);
end.

olesajhik    1   14.01.2022 18:26    2