Определите, что будет выполнятся в результате работы следующего фрагмента программы.Заполните итерационную таблицу. Var k, s:integer; Begin S: = 0; K: = 0; While s < 100 do begin S: = s+k; K: = k+4; End; Write(k); End.