Предмет: Информатика,
автор: evgeniyyy921
составить алгоритм и программу нахождения произведения 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
Похожие вопросы
Предмет: Окружающий мир,
автор: Аноним
Предмет: Английский язык,
автор: Vainny
Предмет: Окружающий мир,
автор: Kefir0685374
Предмет: Литература,
автор: SergeyF333
Предмет: Қазақ тiлi,
автор: naz7373