Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.83/12: Рейтинг темы: голосов - 12, средняя оценка - 4.83
Matfak
1 / 1 / 1
Регистрация: 20.11.2009
Сообщений: 76
#1

Система счисления

27.09.2011, 15:07. Просмотров 2204. Ответов 10
Метки нет (Все метки)

Помогите составить две программы:
1) Сложение чисел в 11 системе счисления;
2) Умножение чисел в 11-ричной системе счисления.

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
27.09.2011, 15:07
Ответы с готовыми решениями:

Система счисления
Народ кто нибудь может объяснить как сделать следующие задания: Задание1....

Система счисления
Написать программу в Delphi, обучающую переводу чисел из десятичной системы...

16-я система счисления
for i:=0 to 511 do begin if i<446 then masW:=$i ...

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

система счисления
привет! нужна помощь... нужна программа для перевода дробных чисел из двоичной...

10
odip
Эксперт С++
7161 / 3220 / 76
Регистрация: 17.06.2009
Сообщений: 14,161
27.09.2011, 15:31 #2
Арифметические действия в 11-ричной системе счисления ничем не отличаются от любой другой системы счисления.
То есть берем просто и складываем
берем просто и умножаем ...
0
Matfak
1 / 1 / 1
Регистрация: 20.11.2009
Сообщений: 76
27.09.2011, 23:35  [ТС] #3
Возми и попробуй, в 11 ричной системе есть буква "А"! вот попробуй просто сложить и умножить!!!))
0
AndyZorg
Заблокирован
28.09.2011, 00:20 #4
Почитайте тему: http://www.cyberforum.ru/delphi/thread356823.html.
Цитирую Mawrat:
Нет чисел шестнадцатиричных или десятичных или двоичных. Числа бывают: целые, натуральные, вещественные. Когда говорят "шестнадцатиричное число", то на самом деле это немного не верно, надо говорить: "шестнадцатиричная запись числа".
Это применимо и к "одинадцатиричному числу"

Добавлено через 32 секунды
Как Вы над записью числа хотите действия производить?

Добавлено через 3 минуты
Ну а если по теме топика. Ваша основная задача - сделать алгоритм преобразования из 11-ричной в десятичную и наоборот.
0
Matfak
1 / 1 / 1
Регистрация: 20.11.2009
Сообщений: 76
28.09.2011, 01:18  [ТС] #5
Нужно сложить два числа в 11 системе (умножить)!
0
Mawrat
12823 / 5731 / 1700
Регистрация: 19.09.2009
Сообщений: 8,807
28.09.2011, 09:04 #6
Здесь видимо требуется представить числа в виде массивов и реализовать алгоритм умножения "столбиком".
Delphi
1
2
3
4
5
type
  TDig : 0..10; //Значения цифр в одиннадцатиричной системе счисления.
var
  Num1, Num2, Res : array[1..10] of TDig;
...
Это больше похоже на задачу по "длинной арифметике".
Если же условие такое: "Дано: два числа представлены в одиннадцатиричной системе счисления. Рассчитать их произведение и показать результат в одиннадцатиричной и десятичной системах счисления."
В этом случае можно выполнить перевод записей из одиннадцатиричной системы в числа, потом выполнить умножение, а затем результат перевести в десятичную и одиннадцатиричную системы.
0
Puporev
Модератор
54217 / 41850 / 28922
Регистрация: 18.05.2008
Сообщений: 98,526
28.09.2011, 10:09 #7
Да вроде мы с ним беседовали.
Система счисления
Решил перейти в более умный раздел...
0
Matfak
1 / 1 / 1
Регистрация: 20.11.2009
Сообщений: 76
29.09.2011, 00:37  [ТС] #8
Вотесть задача как её сделать в делфи, там нужно создать форму и чтоб вводилось два числа, и была кнопка, и окошко с ответам.

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
uses crt;
const figure: string [12]='0123456789A';
var  qint: string;
        q: byte;
     s1,s: string;
   j,zn,z: integer;
 
begin
q:=11; z:=0; zn:=0;
Writeln('Первое число');
Readln(s);
Writeln('Второе число');
Readln(s1);
For j:=1 to length (s) do
    zn:=q*zn+pos(s[j],figure)-1;
For j:=1 to length (s1) do
    z:=q*z+pos(s1[j],figure)-1;
z:=z*zn; //Умножение
//z:=z+zn; //Сложение
Repeat
  qint:=figure[z mod q+1]+qint;
  z:=z div q;
Until z = 0;
Writeln(qint);
end.
Добавлено через 8 часов 21 минуту
ну что можно как-нибудь сделать??
0
Arcor
4817 / 1822 / 380
Регистрация: 20.11.2009
Сообщений: 5,815
Записей в блоге: 1
29.09.2011, 00:52 #9
держи горе луковое
0
Вложения
Тип файла: zip Neuer Ordner (2).zip (549.5 Кб, 54 просмотров)
Matfak
1 / 1 / 1
Регистрация: 20.11.2009
Сообщений: 76
29.09.2011, 08:43  [ТС] #10
неработает, выдаёт ошибку
0
Puporev
Модератор
54217 / 41850 / 28922
Регистрация: 18.05.2008
Сообщений: 98,526
29.09.2011, 08:52 #11
Цитата Сообщение от Matfak Посмотреть сообщение
неработает, выдаёт ошибку
Так это твой код кривой, что предложил, то и получил. Это вообще неправильное решение твоей задачи.
0
29.09.2011, 08:52
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
29.09.2011, 08:52

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

Троичная система счисления
Требуется сложить натуральные числа А и В, заданные в троичной системе...

Фибоначчиева система счисления
уже здесь упоминалось, код отсюда, собственно, НО любое число можно...


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

Или воспользуйтесь поиском по форуму:
11
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru