Составьте и запишите КОМПЬЮТЕРНУЮ программу на языке программирования Паскаль для возведения целого числа А (можно брать и отрицательные числа) в целую степень В (здесь степень будет строго положительная и больше нуля). Ввод чисел осуществлять раздельно, а именно сначала число А, затем число В. Сделать проверку на ввод чисел. Если числа введены неверно, то сообщить об этом пользователю.

27 Окт 2019 в 03:47
115 +1
0
Ответы
1

program Power;

var
A, B, result: integer;

begin
writeln('Enter the base number A:');
readln(A);

writeln('Enter the exponent number B (greater than zero):');
readln(B);

if (B <= 0) then
begin
writeln('Error: Exponent should be greater than zero');
end
else
begin
result := 1;

for var i := 1 to B do
begin
result := result * A;
end;
writeln(A, ' raised to the power of ', B, ' is ', result);

end;
end.

19 Апр в 04:22
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Название заказа не должно быть пустым
Введите email
Бесплатные доработки
Гарантированные бесплатные доработки
Быстрое выполнение
Быстрое выполнение от 2 часов
Проверка работы
Проверка работы на плагиат
Интересные статьи из справочника
Поможем написать учебную работу
Название заказа не должно быть пустым
Введите email
Доверьте свою работу экспертам
Разместите заказ
Наша система отправит ваш заказ на оценку 83 887 авторам
Первые отклики появятся уже в течение 10 минут
Прямой эфир