6) Определите, что будет напечатано в результате работы следующего фрагмента программы: var n, s: integer; begin s := 0; for n:=4 to 13 do begin s := s + 15; end; write(s) end. 5) Определите значение переменных a и b после выполнения следующего фрагмента программы: a := 2468; b := (a mod 1000)*10; a := a div 1000 + b; Выведите значения а и b через пробел.\ 4) Определите, что будет напечатано в результате работы следующего фрагмента программы: var k, s: integer; begin s:=0; k:=0; while s < 100 do begin s:=s+k; k:=k+4; end; write(k); end.
6) Результатом выполнения данного фрагмента программы будет число 150.
5) После выполнения данного фрагмента программы значения переменных a и b будут следующими: a = 2908, b = 680.
4) Результатом выполнения данного фрагмента программы будет число 104.