Составить блок-схему program z3; var i,n : byte; s : real; beginwriteln('введите n ='); readln(n); s : = 0; for i : =1 to n dos: =s+i; writeln('s= ', s); readlnend.

AnastasiaPanda    2   07.06.2019 13:10    0