Население города ежегодно увеличивается на 1/40 населения состава жителей. Через сколько лет население города утроится?
Решите пожалуйста в Паскале 2 задание.

Надо не просто составить программу,а выполнить задание на листке(задание 2)

1 2 3 4 5 6 7 8 9 readln(n); n1:=3*n; i:=0; while n<=n1 do      begin n:=41/40*n; i:=i+1; end; writeln(i);