P = 1, i = 1
<h2>1 цикл</h2>
P = P · i = 1 · 1 = 1
i = i + 1 = 1 + 1 = 2
2 > 3 ? false
<h2>2 цикл</h2>
P = P · i = 1 · 2 = 2
i = i + 1 = 2 + 1 = 3
3 > 3 ? false
<h2>3 цикл</h2>
<u>P = P · i = 2 · 3 = 6</u>
i = i + 1 = 3 + 1 = 4
4 > 3 ? True
Выход из цикла
<h2>Ответ</h2>
B
Ответ:
const
N = 8;
var
a: array[1..N] of integer;
i, j, k: integer;
begin
for i := 1 to N do
readln(a[i]);
for i := 1 to N div 4 do
begin
k := 0;
for j := 4 * i - 3 to 4 * i do
k := k + a[j];
k := k div 4;
for j := 4 * i - 3 to 4 * i do
a[j] := k
end;
for i := 1 to N do
writeln(a[i])
end.
(нарисуй все это)диск' , плеер'' й
Ну..можно потерять носитель информации...