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

Question

Абакум

14 апреля, 11:22

+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.