Даны действительное число a, натуральное число n. вычислить: p=a(a+1)(a+n-1) напить в паскале, как вычислить)

var a,p: real;

i,n: integer;

begin

  read(a,n);

  p: =1;

  for i: = 0 to n-1 do

    p: =p*(a+i);

  writeln(p);

end.

нет,так как это не текствовый документ ,а картинка,и компьютер читает отсканированный файл картинкой а не текстом!

3  учеников этого класса любят все три вида спорта