Сколько раз умножить N на 3, чтобы сумма привысила 100?

Можешь программу написать, пожалуйста

Еще нужна схема

КАКУЮ ПРОГРАММУ?(я 6 класс)Я подумал что N это неизвестное число , а ты 8 класс у вас там-что другое наверное, минимальное число при умножении на 3 которое будет довать это 33,5.

Ну тогда вообще не знаю ,я думал это математика)

Спасибо огромное!

program N3;var b,a:integer;begin  b:=0;  write('Введите число - ');readln(a);  repeat        a:=a*3;      b:=b+1;  until a>100;  writeln('Нужно умножить ', b, ' раз');end.