 рекурсивные функции и процедуры |
Здравствуйте, гость ( Вход | Регистрация )
Образовательно-студенческий форум > Образование > Программирование на Паскале, Си, Бейсике, Ассемблере > Программируем на Паскале и Delphi  |
| gia1509 |
 14.3.2010, 14:08
Сообщение
#1
|
|
Пользователь Группа: Пользователи Сообщений: 3 Регистрация: 14.3.2010 Пользователь №: 22 820  |
Написать рекурсивную функцию PIN(X,N) от вещественного X (X<>0)
и целого N, которая вычисляет величину X^N согласно формуле : + I 1 , при N=0 X^N=<I 1/X^INI , при N<0 I X*X^(N-1) , при N>0 + Цитата(gia1509 @ 14.3.2010, 14:06)  Написать рекурсивную функцию PIN(X,N) от вещественного X (X<>0) и целого N, которая вычисляет величину X^N согласно формуле : + I 1 , при N=0 X^N=<I 1/X^INI , при N<0 I X*X^(N-1) , при N>0 + помогите пожалуйста, а то я ничего понять в этом задании не могу((( |
   |
 
|
| Tanker |
14.3.2010, 17:00
Сообщение
#2
|
 Пользователь Группа: Активисты Сообщений: 363 Регистрация: 26.11.2009 Пользователь №: 22 377 |
Код function PIN(x: real; N: integer): real; begin if N=0 then PIN := 1 else if N<0 then PIN:=1/PIN(x, abs(N)) else PIN:= X*PIN(x, N-1); end; -------------------- Успехов!
|
|
|
|
| Luisa |
2.7.2010, 5:52
Сообщение
#3
|
|
Пользователь Группа: Пользователи Сообщений: 1 Регистрация: 2.7.2010 Пользователь №: 23 101 |
Если не сложно, помогите пожалуйста с этой задачей:
Написать рекурсивную программу поиска индекса минимального элемента массива. Заранее, огромное спасибо! |
|
|
|
|
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | Сейчас: 9.2.2012, 4:30 |
Русская версия Invision Power Board
v2.1.7 © 2012 IPS, Inc.