Cоставить программу, которая находит наименьшее натуральное число n,
при котором 3^n>=100, и результат – наименьшее число n выводит –
на экран.

В соответствии с определением логарифма можно написать, что n≥㏒₃100 илиbegin  Writeln('n=',Trunc(ln(100)/ln(3))+1)end.Результатn=5