данный код перевести из Паскаля в Питон for i:=1 to n do
begin
S:=S+sqr(A/i);
V:=V+h*sqr(A/i);
M:=M+p*h*sqr(A/i);
end;
writeln('Площадь поверхности S=',S:5:2);
writeln('Объем V=',V:5:2);
writeln('Масса M=',M:5:2);

яяя489    3   02.12.2021 09:53    0