Question

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

Answer 1

Progtam asd;
Uses crt;
Var a,n,s:integer;
begin
readln (n);
for a:=3 to n do
s:=a+s;
end.