Нужна объяснение по Паскалю))

Добрый вечер!

Заинтересовался изучением паскаля, но не получается совместить две вещи.
Первым действием я число Х возвожу в степень У.

var

x,n:real;

begin

readln(x,n);

writeln(exp(ln(x)*n));

readln;

end.

Далее я хочу сравнить полученный результат с другим числом и вывести текст на экран о том, больше, меньше или равно указанного числа.

Уже часа два терзаюсь!!

Помогите, люди добрые)

Буду благодарен!

Могу помочь с объяснением финансовых тем

Вы смотрите срез комментариев. Показать все
0
Автор поста оценил этот комментарий
В общем пиши, помогу
раскрыть ветку (2)
0
Автор поста оценил этот комментарий

В общем, сделал вот так:

Var



x,n,k,p:real;



begin


p:=10000;


Writeln ('Введите условие');


readln(x);


Writeln ('Введите степень');


readln(n);


k:=exp(ln(x)*n);


Writeln (k);


if (k>=p) then begin


writeln('Результат больше либо равен 10 000'); end


else


writeln('Результат меньше 10 000');


end.

0
Автор поста оценил этот комментарий

Добрый вечер

Вы смотрите срез комментариев. Чтобы написать комментарий, перейдите к общему списку