1.найти произведение всех натуральных чисел, кратных 3 и меньших 13. обратите внимание, что начальное

Question

Информатика: 1.найти произведение всех натуральных чисел, кратных 3 и меньших 13. обратите внимание, что начальное значение р=1. 2.найти количество натуральных чисел, нечет

skrimiks · Answer

Vari,p:integer;beginp:=1;for i:=1 to 13 doif i mod 3 = 0 then p:=p*i;writeln( Произведение = ,p);end....

1.найти произведение всех натуральных чисел, кратных 3 и меньших 13. обратите внимание, что начальное значение р=1. 2.найти количество натуральных чисел, нечет

Популярные вопросы