Страница: 1 |
Страница: 1 |
Вопрос: Kak vozvisti chislo v spemen' ????
Добавлено: 20.08.04 00:40
Автор вопроса: rx | Web-сайт:
A imenno v Pascal'e
v VB eto tak 2^3 budet 8
a v Paskale kak eto zdetat (dolzhno bit' pohozhe na Dephi)
2*2*2 ne pridlogat'... imenno v stepen'
v c++ yest' funkcija pow(x,y), a v Paskale chota takoje jest' ?????? HEEEELLLPPP :O
Ответы
Всего ответов: 11
Номер ответа: 1
Автор ответа:
dNW
Вопросов: 30
Ответов: 683
Профиль | | #1
Добавлено: 20.08.04 09:53
Так здесь же программирование на VB а не на паскале.
Тебе в офф-топ
Номер ответа: 2
Автор ответа:
rx
ICQ: 310731115
Вопросов: 10
Ответов: 45
Web-сайт:
Профиль | | #2
Добавлено: 20.08.04 12:15
Офф-топ = Нетехнические разговоры и вопросы !!!не связанные с программированием!!!.
Общий форум = В форуме обсуждаются все темы.
Skopiroval Pryamo s saita...
I yesli nemozhesh otvetit na etot voperos, togda ne otvichai.....
Номер ответа: 3
Автор ответа:
rx
ICQ: 310731115
Вопросов: 10
Ответов: 45
Web-сайт:
Профиль | | #3
Добавлено: 20.08.04 12:45
Ladno...
Dzdelal sam function....
Toka yest nedostatok ... stepen' mozhet bit' toka celoe chislo....
function pow(x,y:integer):integer;
BEGIN
if y=1 then pow:=x
else pow:=pow(x,y-1);
END;
{opyat zhe rekursiya}
Yesli yest' vstroinnaya funkciya, skazhite plz !
Номер ответа: 4
Автор ответа:
CyRax
Разработчик Offline Client
ICQ: 204447456
Вопросов: 180
Ответов: 4229
Web-сайт:
Профиль | | #4
Добавлено: 21.08.04 06:13
Странный ты парень однако. Наверное в Прибалтике все такие. Эх, жаль не успел я в советские времена туда съездить.
Ладно, скажу тебе по секрету: Паскаль - масдай, Бейсик - форева.
Номер ответа: 5
Автор ответа:
rx
ICQ: 310731115
Вопросов: 10
Ответов: 45
Web-сайт:
Профиль | | #5
Добавлено: 21.08.04 12:56
Kazhdij so svoimi strannostyami
A nashot:
"Паскаль - масдай, Бейсик - форева. "
Soglasin, toka znaja odzin Basic, daleko ne popodzosh...
Da prosto dlya shkoli nado....
Номер ответа: 6
Автор ответа:
dNW
Вопросов: 30
Ответов: 683
Профиль | | #6
Добавлено: 21.08.04 15:59
Так ведь сейчас каникулы...?
Номер ответа: 7
Автор ответа:
rx
ICQ: 310731115
Вопросов: 10
Ответов: 45
Web-сайт:
Профиль | | #7
Добавлено: 21.08.04 20:48
>"Так ведь сейчас каникулы...?"
Ti prav koneshno...
Toka ya student.... I zdaju vsjo v poslednij moment
DOLGI ??? U KAVO TAKIH NIBIVAJET << A ????
Do 30 avgusta nado vsyo zdac, a to p.z.ec
Номер ответа: 8
Автор ответа:
Aracon
ICQ: 221881915
Вопросов: 16
Ответов: 28
Web-сайт:
Профиль | | #8
Добавлено: 22.08.04 14:34
??? Не понял, зачем тебе рекурсия для возведения в степень???
Вот так разве нельзя:
function Stepen(a,x: integer): integer;
var i: integer;
begin
Stepen:=a;
for i:=2 to x do
Stepen:=Stepen*a;
end;
Это первый способ. Теперь второй (математический):
function Stepen(a,x: integer): integer;
begin
Stepen=exp(x*ln);
end;
Если ты не забыл математику, то это равно a^x...
Номер ответа: 9
Автор ответа:
dNW
Вопросов: 30
Ответов: 683
Профиль | | #9
Добавлено: 23.08.04 14:48
>OLGI ??? U KAVO TAKIH NIBIVAJET << A ????
А я тебя и не упрекаю. Так, поинтересовался
Номер ответа: 10
Автор ответа:
Kodo
Разработчик Offline Client
ICQ: 293048085
Вопросов: 37
Ответов: 457
Профиль | | #10
Добавлено: 23.08.04 15:23
AASoft, а ты не пробовал приклеивать русские наклейки на клаву? Или хотя бы экранной пользоваться? Хотя я всю русскую клаву наизусть знаю...
Номер ответа: 11
Автор ответа:
Sharp
Лидер форума
ICQ: 216865379
Вопросов: 106
Ответов: 9979
Web-сайт:
Профиль | | #11
Добавлено: 24.08.04 11:23
> function Stepen(a,x: integer): integer;
> begin
> Stepen=exp(x*ln);
> end;
Маленькая поправочка:
function Stepen(a,x: integer): integer;
begin
Stepen := exp(x*ln);
end;