Вот решения на с++.
Оба делал через операторы if.
Объяснение:често незнаю кстати это какй класс просто интересно
Var S,E:real;
N:integer;
Begin
Write('E = ');ReadLn(E);
N:=2;
S:=0;
While (N-1)/(N*N)>E do
Begin
S:=S+(N-1)/(N*N);
N:=N+1
End;
WriteLn(S)
End.
Ответ:
Здесь одно предложение, поэтому вся информация новая
Word, Open Office, ,Notepad++, AkelPad, UltraEdit,Cтандартный блокнот Windows, AbiWord, WordPerfect,Notepad++, AkelPad, UltraEdit,Cтандартный блокнот Windows