вычислить и вывести произведение квадратов чисел натурального ряда от 3 до N

(паскаль) Помогите пожалуйста очень срочно надо!!!

1

Ответы и объяснения

2013-01-31T10:42:19+00:00

var

  res : int64;

  i, n : integer;

begin

  res := 1;

  for i := 3 to n do

    res := res * sqr (i);

  writeln (res);

end.