Есть ответ 👍

Паскаль розробіть програму, яка визначатиме добуток чисел від 1 до 30

143
346
Посмотреть ответы 2

Ответы на вопрос:

mriya1987
4,4(89 оценок)

Program al; var p,i: integer;     begin      p: =1;     for i: = 1 to 30 do    p: =p*i;     writeln('p=',p);     readln;     end.

457833578

4+5+7+8+3+3+5+7+8=50

50 на 3 не делится, соответственно 457833578 тоже не делится на 3.

Популярно: Информатика