Ефрем
6 год назад
выдает ошибку Program1.pas(5) : Встречено 'To', а ожидался операторпосмотри пожалуйста, что не так в пятой строке. program n1; Var E, a: Real; N, i: Integer; Begin Write('N='); ReadLn(N); E:=1; To N DoBegin a:=a/i; E:=E+a End; WriteLn('E=', E) End.
ОТВЕТЫ
Глеб
Oct 24, 2020
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.
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.
204
Смежные вопросы:
