Вопрос, который вызвал трудности

Выдает ошибку Program1.pas(5) : Встречено 'To', а ожидался оператор
посмотри пожалуйста, что не так в пятой строке.

program n1;
Var E, a: Real; N, i: Integer;
Begin
Write('N='); ReadLn(N);
E:=1; To N Do
Begin
a:=a/i;
E:=E+a
End;
WriteLn('E=', E)
End.

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.

После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:

Program n1;
Var E, a: Real;
N, i: Integer; 
Begin 
Write('N='); ReadLn(N); 
E:=1;
For i:=1 To N Do
Begin a:=a/i;
 E:=E+a
 End;
 WriteLn('E=', E)
 End.