Question

найти произведение чисел N,которые делятся на 3 нацело.

Answer 1

Если N это количество чисел, начинаем с 3

var

i,n,p:integer

begin

readln(n);

i:=3;

p:=1;

while i<=3*n do

begin

p:=p*i;

i:=i+3;

end;

writeln(p);

end.

Если N это верхняя граница чисел

var

i,n,p:integer

begin

readln(n);

for i:=3 to n

if i mod 3 = 0 then

p:=p*i;

writeln(p);

end.

 

Answer 2

Произведение чисел N, которые делятся на 3 нацело, это произведение всех натуральных чисел, которые кратны 3. Например, если N = 6, то произведение чисел, которые делятся на 3 нацело, будет равно 3 * 6 = 18. Если N = 9, то произведение будет равно 3 * 6 * 9 = 162. Общая формула для нахождения такого произведения можно выразить с помощью факториала и степени: (3N)! / (N! * 3^N). Эта формула следует из того, что каждое число, которое делится на 3 нацело, можно представить в виде 3k, где k - натуральное число. Тогда произведение всех таких чисел до 3N будет равно 3 * 6 * ... * 3N = 3^N * (1 * 2 * ... * N) = 3^N * N!. Для доказательства этой формулы можно использовать математическую индукцию. На сайтах [1](http://www.bolshoyvopros.ru/questions/4191977-kak-reshit-na-doske-napisano-neskolko-nat-chisel-kotorye-deljatsja-na-3.html), [2](https://uchi.ru/otvety/questions/nayti-proizvedenie-chisel-n-kotorie-delyatsya-na-3-natselo) и [3](https://online-otvet.ru/informatika/5b74966cf04705552c32ceef) можно найти примеры решения подобных задач.