Program n1;
const n=20;
var y: real;
n: integer;
begin
y:=0;
for i:=1 to n do y:=y+1/n;
writeln(y);
end.
Это обусловлено тем, что сервер не успевает обрабатывать старые запросы, которых накопилось уже много, а появляются еще и новые, которые встают в очередь и не успевают обрабатываться.
Var a:integer;
<span>begin </span>
<span>writeln('Введите сторону куба'); </span>
<span>readln(a); </span>
<span>writeln('Объем куба с ребром ',a,' равен — ',a*a*a); </span>
<span>writeln('Площадь поверхности куба равна — ', 6*a*a); </span>
<span>end. </span>
Номер 17, ответ 9
А ещё у вас ошибка вроде в 18
Ряд медленно сходящийся к пи/2, при n = 100000 только пять знаков после запятой.
#include <iostream>
<span>using namespace std;
</span>const int m = 100000;
<span>int main() {
</span><span> double n,p;
</span><span> p=1; n=1;
</span><span> while (m>n) {
</span><span> p*=4*n*n/(4*n*n-1);
</span><span> n++;
</span><span> }
</span><span> cout<<p<<endl;
</span><span> </span><span> </span><span>system("pause");
</span><span> return 0;
</span><span>}
</span>