Вопрос, который вызвал трудности

Даны числа A, B (A > 1). Получить все степени числа A, меньшие числа B. (программа Паскаль)

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.

После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:

program STEPENI;
var A, B, C: real;
begin
readln (A, B); C := A;
while C < B do
    begin
writeln (C);
C := C*A;
     end;
end.