Перевести на язык qbasic var i: integer; s: longint; begin for i: =20 to 40 do s: =s+i*i*i; writeln('сумма всех кубов от 20 до 40 = ',s); end.

vladplotnikov2    3   26.09.2019 20:50    0