Похоже, что вопросов с номером один не возникает. Тогда можно на месте формулы написать формулу в формате: "=ЕСЛИ(A1>0;вторая формула;первая формула)". На месте A1 стоит значение x
<h3>PascalABC.NET 3.4.2, сборка 1859 от 08.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var (s, ss, k) := (ReadInteger('s='), 0, 3);
while ss <= s do
begin
ss += k;
k+=2
end;
ss.Println
end.
нужно знать сколько весит один символ тогда x*64*16 // это одна страница. затем переводи в мб