Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/40: Рейтинг темы: голосов - 40, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 07.10.2015
Сообщений: 105

Перевод числа в факториальную систему счисления

14.10.2015, 08:45. Показов 8527. Ответов 4
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
перевод числа в факториальную систему счисления
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
14.10.2015, 08:45
Ответы с готовыми решениями:

Перевод числа в двоичную систему счисления.
Дано число n перевети ево в двоичную систему???? Хелп

Перевод числа в десятичную систему счисления
Дана символьная строка, представляющая собой запись натурального числа в p-ичной системе счисления ( ).Составить программу для перевода...

Перевод числа в девятиричную систему счисления
Придумайте выражение,которое с помощью mod,div,сложения,вычитания и умножения: Переводит число от 1 до 9^4-1 в девятиричную систему...

4
 Аватар для APALoff
1648 / 1077 / 1081
Регистрация: 03.07.2013
Сообщений: 4,507
14.10.2015, 09:44
Это как?
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33399 / 21509 / 8236
Регистрация: 22.10.2011
Сообщений: 36,907
Записей в блоге: 12
14.10.2015, 09:48
Это так: Факториальная система счисления
1
14.10.2015, 09:58

Не по теме:

О, век живи - век учись.

0
Модератор
Эксперт по электронике
 Аватар для ФедосеевПавел
8663 / 4500 / 1670
Регистрация: 01.02.2015
Сообщений: 13,920
Записей в блоге: 13
14.10.2015, 18:14
Лучший ответ Сообщение было отмечено ZX Spectrum-128 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
program FactorialNumeralSystem;
 
  function DecToChar(n: qword): char;
  begin
    if n < 10 then
      DecToChar := char(n + Ord('0'))
    else
      DecToChar := char(n + Ord('A') - 10);
  end;
 
  function DecToFac(n: qword): string;
 
    procedure Recurse(i, f: qword);
    begin
      f := i * f;
      if n < f then
        exit;
      Recurse(i + 1, f);
      DecToFac := DecToFac + DecToChar(n div f);
      n := n mod f;
    end;
 
  begin
    DecToFac := '';
    Recurse(1, 1);
  end;
 
begin
  writeln('100 (dec) = ', DecToFac(100), ' (fac)');
  writeln('999999999999 (dec) = ', DecToFac(999999999999), ' (fac)');
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
14.10.2015, 18:14
Помогаю со студенческими работами здесь

Перевод числа из двоичной в десятичную систему счисления
for j:=0 to length(s)-1 do begin val(s,c,code); k:=k*(exp(ln(c*2)*j)); end; где s -...

Осуществить перевод числа в систему счисления с заданным основанием q (q<17)
Задано целое число a в десятичной системе счисления. Осуществить перевод числа в систему счисления с заданным основанием q (q&lt;17).

Одномерные массивы.Перевод числа в шестнадцатеричную систему счисления
Дано целое число в двоичной системе счисления, т.е.последовательность цифр 0 и 1, разделенных точкой.Составить программу перевода этого...

Осуществить перевод числа в систему счисления с заданным основанием q (q < 14)
Задано целое число a в десятичной системе счисления. Осуществить перевод числа в систему счисления с заданным основанием q (q&lt;14).

Перевод числа в десятичную систему счисления (Рекурсия -> Итерация)
Всех приветствую, помогите пожалуйста переделать программу с рекурсии на любой цикл. Собственно сама задача. Дана символьная строка,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Новые блоги и статьи
Оттенки серого
Argus19 18.03.2026
Оттенки серого Нашёл в интернете 3 прекрасных модуля: Модуль класса открытия диалога открытия/ сохранения файла на Win32 API; Модуль класса быстрого перекодирования цветного изображения в оттенки. . .
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru