решить на паскале. Какие значения принимает S ?
program m1;
var i,n,s:integer;
begin
s:=1;
i:=2;
while i<12 do
begin
s:=s+i;
i:=i+1;
end;
write(s);
end.

annmslna2044    2   05.04.2020 13:03    2