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

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

Join the forum, it's quick and easy

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

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

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

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

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

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

» Арена искусственных интеллектов Gridwars
Деление длинных чисел. Длинная арифметика. Delphi, Pascal. EmptyСр Окт 12, 2016 2:43 am автор SeriousPasha

» требуется несколько JS разработчиков
Деление длинных чисел. Длинная арифметика. Delphi, Pascal. EmptyПт Окт 07, 2016 10:19 pm автор mrktwn1

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

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

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

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

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

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

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

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

Aster (142)
Деление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_leftДеление длинных чисел. Длинная арифметика. Delphi, Pascal. BarДеление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_right 
Exkalibur (89)
Деление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_leftДеление длинных чисел. Длинная арифметика. Delphi, Pascal. BarДеление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_right 
Чебурашка (63)
Деление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_leftДеление длинных чисел. Длинная арифметика. Delphi, Pascal. BarДеление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_right 
Administrator (34)
Деление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_leftДеление длинных чисел. Длинная арифметика. Delphi, Pascal. BarДеление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_right 
ak95 (8)
Деление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_leftДеление длинных чисел. Длинная арифметика. Delphi, Pascal. BarДеление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_right 
Пушкин (7)
Деление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_leftДеление длинных чисел. Длинная арифметика. Delphi, Pascal. BarДеление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_right 
K4_ (7)
Деление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_leftДеление длинных чисел. Длинная арифметика. Delphi, Pascal. BarДеление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_right 
LuDa (7)
Деление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_leftДеление длинных чисел. Длинная арифметика. Delphi, Pascal. BarДеление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_right 
Goldcoding (6)
Деление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_leftДеление длинных чисел. Длинная арифметика. Delphi, Pascal. BarДеление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_right 
Admin (6)
Деление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_leftДеление длинных чисел. Длинная арифметика. Delphi, Pascal. BarДеление длинных чисел. Длинная арифметика. Delphi, Pascal. Bar_right 

Партнеры

Деление длинных чисел. Длинная арифметика. Delphi, Pascal. Top100 Rambler's Top100

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

    Деление длинных чисел. Длинная арифметика. Delphi, Pascal.

    Aster
    Aster
    Aster
    Admin
    Admin


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

    Деление длинных чисел. Длинная арифметика. Delphi, Pascal. Empty Деление длинных чисел. Длинная арифметика. Delphi, Pascal.

    Сообщение автор Aster Пн Июн 07, 2010 1:09 pm

    Прежде, чем читать эту статью, ознакомьтесь с:
    https://progaem.forum2x2.ru/forum-f3/tema-t82.htm
    https://progaem.forum2x2.ru/forum-f3/tema-t81.htm

    Итак. Делить, как и умножать, складывать и вычитать мы будем столбиком. Здесь я расскажу только, как делить длинное число на короткое.

    Код:

    Function divlong(a: TLong, b: integer): TLong;
    Var i, ost: integer;
    Begin
      ost := 0;
      fillchar(result, sizeof(rezult), 0);
      For i := a[0] downto 1 do
      begin
        Result[i] := (a[i] + ost * base);
        ost := result[i] mod b;
        result[i] := result[i] div b;
      end;
      result[0] := a[0];
      while result[result[0]] = 0 do
        dec(result[0]);
    End;

    Программа написана на Delphi, все константы описаны в статьях о длинной арифметике.
    Удачи.
    • Вернуться к началу
    Чебурашка
    Чебурашка
    Чебурашка
    Активный пользователь
    Активный пользователь


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

    Деление длинных чисел. Длинная арифметика. Delphi, Pascal. Empty Re: Деление длинных чисел. Длинная арифметика. Delphi, Pascal.

    Сообщение автор Чебурашка Вс Авг 08, 2010 1:32 pm

    Спасибо за алгоритм ^_^ Поизучаю на досуге.
    • Вернуться к началу
      Текущее время Вт Май 07, 2024 3:08 am