Вопрос Как быстро решать такие задачи вручную (Pascal): Определите какое число будет выведено в ходе этой п

[бумбумбум]

var
i : longint;
function f(n: longint): longint;
begin
f := n * n;
end;
function g(n: longint): longint;
begin
g := 2000*n + 3;
end;
begin
i := 1;
while f(i) < g(i) do
i := i*2;
writeln(i)
end.

 

[artyom]

Никак. Тут либо есть талант, либо нет.

 

[дарк]

Ищем начало программы и идем по строчкам, там где вызов функции - прыгаем в функцию. Если вычисления простые держим переменные в голове, иначе записываем. Второй способ - засунуть в среду разработки и запустить.

 

[dem0n]

Универсального способа нет. В данном случае надо решить квадратное неравенство i^2<2000i+3 А затем подобрать ближайшую степень двойки, которая ему удовлетворяет (можно через логарифм, если знаешь, что это). Но чтобы это понять, нужен мозг.