Question

определите что будет выведено в результате выполнения следующей программы
var n, s:integer;
begin
n:=0;
s:=0;
while s<=35 do
begin
n:=n+1;
s:=s+4;
end;
write (n);
end.

Answer 1

s будет увеличиваться на 4, до тек пор, пока s не станет строго больше 35, при этом n будет увеличиваться на "1" каждый раз.
35 / 4 = 8(3), + 1 (т.к. есть остаток)
Ответ: 9