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

Question

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

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

Гость

Ответ(ы) на вопрос:

Accepted Answer

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