Объясните как решается программа на Паскале. var k, s: integer;
begin
s:=512;
k:=0;
while s < 2048 do
begin
s:=s+64;
k:=k+1;
end;
write (k);
end.
​

tshaxzoda    1   06.11.2020 10:00    1