Тема вопроса: нет. Найдите ошибку в следующ

Сложность вопроса: 1 (из 10)

<question>237

Найдите ошибку в следующей программе, которая находит n!.

program gh;

var p,n:integer;

i:real;

begin

read (n);

p:=1;

for i:=1 to n

p:=p*i;

write (p)

end.

i:integer; for i:=1 to n do

в строке for i:=1 to n необходимо добавить do

p: real

i: string