Var k, s: integer; begin k: = 2; s: = 7; while s < 70 do begin s: = s + 10; k: = k * 2 end; write (k) end.

kkkkiiiii    1   26.11.2019 11:22    1