Определите значение переменной р после выполнения следующего фрагмента программы: p: =1; i: =3; while i < = 9 do begin p : = p * (i div 3); i : = i + 1; end;

1 шаг цикла:
P=1
i = 4
2 шаг цикла
P=1
i = 5
3 шаг цикла
P = 1
i = 6
4 шаг цикла
P = 1*2 = 2
i = 7
5 шаг цикла
P = 2*2 = 4
i = 8
6 шаг цикла
P = 4*2 = 8
i = 9
7 шаг цикла
P = 8*3 = 24
i = 10

ответ: P=24