Var i,s: integer; begin s:=0; i:=5;
while i>2 do begin i:=i-2;
s:=s +i*i;
end;
end. ответ дайте в виде: s= i= *

varkraft    2   09.12.2021 17:36    1