Программируем

Пожалуйста, зарегистрируйтесь или войдите под уже созданным логином. Вы получите полный доступ ко всем статьям форума.

Join the forum, it's quick and easy

Программируем

Пожалуйста, зарегистрируйтесь или войдите под уже созданным логином. Вы получите полный доступ ко всем статьям форума.

Программируем

Вы хотите отреагировать на этот пост ? Создайте аккаунт всего в несколько кликов или войдите на форум.
Программируем

На нашем форуме программистов вы сможете найти софт для программирования и другие программы. На форуме обсуждаются многие языки программирования, задачи и их решения. Используются языки: C, Assembler, Pascal, Delphi, Flash и другие.

Последние темы

» Арена искусственных интеллектов Gridwars
Как в Pascal возвести число в степень. EmptyСр Окт 12, 2016 2:43 am автор SeriousPasha

» требуется несколько JS разработчиков
Как в Pascal возвести число в степень. EmptyПт Окт 07, 2016 10:19 pm автор mrktwn1

» Защита приложения от взлома
Как в Pascal возвести число в степень. EmptyЧт Июн 18, 2015 10:28 pm автор stradi

» Ищите программиста или дизайнера?
Как в Pascal возвести число в степень. EmptyПт Мар 27, 2015 6:25 am автор фриланс

» Создание и продвижение сайтов, их развитие.
Как в Pascal возвести число в степень. EmptyСр Мар 25, 2015 12:40 am автор asdfghhgfdsa

» Исходники для студентов + скайп-консультации,помощь в написании программ
Как в Pascal возвести число в степень. EmptyВт Окт 07, 2014 11:25 pm автор Horpion

» IT- технологии для развития бизнеса
Как в Pascal возвести число в степень. EmptyПн Июн 23, 2014 6:11 pm автор dvos12

» Стенли Кубрик "С Широко закрытыми Глазами"
Как в Pascal возвести число в степень. EmptyЧт Июн 12, 2014 2:01 am автор Vertuozzz

» Каталог популярных хостинг компаний
Как в Pascal возвести число в степень. EmptyСб Май 10, 2014 7:18 pm автор naik

Самые активные пользователи

Aster (142)
Как в Pascal возвести число в степень. Bar_leftКак в Pascal возвести число в степень. BarКак в Pascal возвести число в степень. Bar_right 
Exkalibur (89)
Как в Pascal возвести число в степень. Bar_leftКак в Pascal возвести число в степень. BarКак в Pascal возвести число в степень. Bar_right 
Чебурашка (63)
Как в Pascal возвести число в степень. Bar_leftКак в Pascal возвести число в степень. BarКак в Pascal возвести число в степень. Bar_right 
Administrator (34)
Как в Pascal возвести число в степень. Bar_leftКак в Pascal возвести число в степень. BarКак в Pascal возвести число в степень. Bar_right 
ak95 (8)
Как в Pascal возвести число в степень. Bar_leftКак в Pascal возвести число в степень. BarКак в Pascal возвести число в степень. Bar_right 
Пушкин (7)
Как в Pascal возвести число в степень. Bar_leftКак в Pascal возвести число в степень. BarКак в Pascal возвести число в степень. Bar_right 
K4_ (7)
Как в Pascal возвести число в степень. Bar_leftКак в Pascal возвести число в степень. BarКак в Pascal возвести число в степень. Bar_right 
LuDa (7)
Как в Pascal возвести число в степень. Bar_leftКак в Pascal возвести число в степень. BarКак в Pascal возвести число в степень. Bar_right 
Goldcoding (6)
Как в Pascal возвести число в степень. Bar_leftКак в Pascal возвести число в степень. BarКак в Pascal возвести число в степень. Bar_right 
Admin (6)
Как в Pascal возвести число в степень. Bar_leftКак в Pascal возвести число в степень. BarКак в Pascal возвести число в степень. Bar_right 

Партнеры

Как в Pascal возвести число в степень. Top100 Rambler's Top100

Участников: 2

    Как в Pascal возвести число в степень.

    Aster
    Aster
    Aster
    Admin
    Admin


    Сообщения : 142
    Очки : 274
    Репутация : 11
    Дата регистрации : 2010-01-07
    • Сообщение 1

    Как в Pascal возвести число в степень. Empty Как в Pascal возвести число в степень.

    Сообщение автор Aster Вс Апр 18, 2010 3:22 pm

    Недавно обнаружил, что многие не знают, как возвести число в некоторую степень.
    Самый легкий способ просто перемножать это число в цикле, т.к в паскале нет специальной функции возведения числа в степень.

    Код:

    st := 10;
    rez := 1;
    For i := 1 to st do
      rez := rez * chislo;

    st - необходимая степень,
    chislo - данное число,
    rez - результат.

    Есть и другой вариант возведения, более быстрый с возможностью возведения в большую степень очень большого числа. Но об этом расскажу позже.
    • Вернуться к началу
    Чебурашка
    Чебурашка
    Чебурашка
    Активный пользователь
    Активный пользователь


    Сообщения : 63
    Очки : 77
    Репутация : 0
    Дата регистрации : 2010-07-03
    Возраст : 30
    Откуда : Россия, Сургут
    • Сообщение 2

    Как в Pascal возвести число в степень. Empty Re: Как в Pascal возвести число в степень.

    Сообщение автор Чебурашка Сб Июл 03, 2010 2:31 am

    По твоему примеру можно и назад считать!))
    ВОт мой небольшой алгоритм
    Код:
    k := n;
    b := 1;
    c := a;
    while k <> 0 do begin
      if k mod 2 = 0 then begin
        k:= k div 2;
        c:= c * c;
      end else begin
        k := k - 1;
        b := b * c;
      end;
    end;
    • Вернуться к началу
      Текущее время Чт Май 02, 2024 10:14 pm