данный код перевести из Паскаля в Питон for i:=1 - вопрос №206969791 от Ариана16112001 13.02.2020 14:17

Question

Информатика: данный код перевести из Паскаля в Питон 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);

Ариана16112001 · Answer

* F (file) specs define files and other i/o devices     FARMstF1   UF   E        K     Disk    Rename(ARMST:RARMST)      * D specs are used to define variables and parameters      * The prototype for the program is in a separate file      * allowing other programs to call it      /copy cust_pr      * The procedure interface describes the *ENTRY parameters     D getCustInf      PI     D  pCusNo                        6p 0   const     D  pName                        30a     D  pAddr1              ...

данный код перевести из Паскаля в Питон 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);

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