Напишите рекурсивную функцию, возводящую число a в ступень n. Гарантируется, что

Напишите рекурсивную функцию, возводящую число a в степень n. Гарантируется, что все числа "вмещаются" в стандартные вещественные (a и ответ) и целые (n) типы.

Входные данные
Вводится 2 числа - a и n (число n может быть отрицательным).

Выходные данные
Необходимо вывести значение an

Примеры
входные данные
2 -1
выходные данные
0.5

Задать свой вопрос
Галка
Язык и версия компилятора? Надобно ли инспектировать исключения (a<0, a=0) ?
Алексей Опаленов
И еще: если a=0, какой итог типа вещественного типа обязана возвращать функция для отрицательного n?
Анатолий Визоетов
Исправляю описку: Если a=0, какой итог вещественного типа обязана возвращать функция для отрицательного n?
Анастасия Капурова
Понятно... задачу бросили, а дальше - наплевать
1 ответ
Var  a,f: real;  n,i,g: integer;begin  read(a,n);  if nlt;0 then begin   g:=n;   n:=-n;  end;  f:=1;  for i:=1 to n do   f:=a*f;  if glt;0 then write(1/f)  else write(f);  readln;  readlnend. 
Степан Заземко
А где здесь, пардон, рекурсия?
Молоковичев Саша
Да и функции, фактически, тоже не вижу
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт