Помогите пожалуйста решить задачку с помощью (while... do, repeat... until)
Дана степень натурального числа a. Найти ее показатель.
Заранее спасибо
показатель тоже натуральный? или может быть любым? (в том числе дробным)
var a,n,p,b: integer;
begin
write('n = '); readln(n); { <--- это - само число }
write('a = '); readln(a); { <--- это - число в какой-то степени }
p:=1;b:=0;
while p<a do begin
p:=p*n;
inc(b);
end;
writeln('Stepen =', b);
end.
Если показатель натуральный....
Он наверно и должен быть натуральным, в задании ничего не говорится о показателе степени.