Заменить цикл while на for в программе: var i,z,y,x: integer; begin writeln('введите числа: '); readln(x,y); while i < > y do begin z: =z+x; i: =i+1; end; write(z); end.

228ANONIM1337    2   16.05.2019 22:27    1