составить алгоритм и программу нахождения произведения p=2*5*8*11*...*n
evgeniyyy921:
яп abc pascal
Ответы
Ответ дал:
2
Программа:
Pascal:
var
proiz, now, n: integer;
begin
readln(n);
proiz := 1; now := 2;
while(now <= n) do begin
proiz *= now;
now += 3;
end;
writeln(proiz);
end.
Объяснение:
В начале регистрируются переменные: proiz - для подсчёта произведения, now - текущее число, которое будет умножаться, n - определённое число последовательности.
С помощью цикла while проверяем истинность условия, что now ≤ n. Мы начинаем с двух (now = 2). Каждый раз переменная proiz умножается на текущее число до тех пор, пока переменная now не станет равной (или больше), чем n. Из последовательности из задания можем понять, что каждый раз текущее число увеличивается на 3 единицы.
В конце вывод произведения.
Результат:
11
880
17
209440
#SPJ1
Вас заинтересует
1 год назад
1 год назад
2 года назад
2 года назад
7 лет назад
9 лет назад