Ответ 45, т.к. только это число находится в промежутке между 60 и 30 из условия, это выражение модно представать, как: 60<х>30, 60 больше икс, но меньше 30
40 Гбайт = 40 * 1024 * 1024 * 1024 * 8 бит = 343597383680 бит
700 Мбайт = 700 * 1024 * 1024 * 8 бит = 5872025600 бит
Кол-во = 343597383680 / 5872025600 шт = 58.51428571428571 шт ~= 59 шт (округляем в большую сторону так как кусками тут быть не может)
Корпус , жёсткий диск . Всё!!!
Var
e, a, s: real;
i: integer;
begin
write('Введите точность Е ');
readln(e);
a := 0;
s := a;
i := 0;
repeat
i := i + 1;
a := 1 / sqr(sqr(i));
s := s + a;
until abs(a) < e;
writeln(s);
end.