<em>VAR</em>
<em> ans: Real;</em>
<em> n, i: Integer;</em>
<em>BEGIN </em>
<em> Read(n);</em>
<em> </em>
<em> For i := 1 to n do </em>
<em> ans := ans + (1 / Sqr(i));</em>
<em> </em>
<em> Write(ans);</em>
<em>END.</em>
(признайся про Любу, Лену, майл , роза) ну и всё .
1) Неправильное задание кажется, получается не целое выражение
1369875 (Бит) =
(Гб)
2) 5 (Гб) = 5*1024*1024*1024= 5 368 709 120 (Байт)
3) Переводим объём диска в Кб
700 (Мб) = 716 800 (Кб)
файлов поместится на диске размером 12457 (Кб)
Надстройки, поиск решения, выделяем.
См приложение.