Помогите составить программу вычисляющая произведение натуральных чисел от 3 до n и выводит результат на экран как можно быстрее (все делать pascalABC)

Question

Котя

4 января, 07:27

+1

Ответы (1)

Знаете ответ на вопрос?

Евгеня · Answer 1

Progtam asd;

Uses crt;

Var a, n, s:integer;

begin

readln (n) ;

for a:=3 to n do

s:=a+s;

end.