Калькулятор программиста

@Серго1996 · Регистрация: 06.04.2015

Студворк — интернет-сервис помощи студентам

Тема такая. Есть калькулятор в 10СС, надо, чтобы он работал также в 2СС, 8СС и 16СС. Пожалуйста, сделайте пример для двоичной. Дальше сам попробую. Заранее огромное спасибо.
П.С. алгоритм такой: пользователь вводит 1 число, выбирает арифметическое действие, потом вводит второе число, далее при нажатии кнопки равно оба числа переводятся в 10СС, выполняется ранее выбранное арифметическое действие и на выводе число переводится из 10СС в ту СС, которую выбрал пользователь изначально (в калькуляторе имеются 4 РадиоБаттона).

@Arcor · 27.05.2015, 13:51

Zombi_sib,Проверяется там i-тая позиция бита в числе. Если там 1 то прибавляем 1к строке ну или 0 если там 0 в позиции. А вообще это побитовые операции. Очень интересная тема)

Добавлено через 12 минут
Изначально у нас 1, пусть будет 8 позиций. для представлегия байта. 0000 0001. Далее мы через shl двигаем 1 влево на каждой итерации. А так как операция и and дает единицу только в случае если и в числе и в маске 1 то результат будет 1 в любых других случаях будет 0

@Серго1996 · 27.05.2015, 23:59 **[ТС]**

Arcor, Калькулятор программиста.rar
Я сделал прогу, теперь все арифметические действия в двоичной. Один косяк - перевод не пашет чет. Подлатай, пожалуйста ее.

@Серго1996 · 28.05.2015, 00:01 **[ТС]**

Verevkin, прога есть, теперь все действия в двоичной. Помоги подлатать перевод, а то он чет не пашет. Прога выше)

Verevkin · 28.05.2015, 00:15

Сообщение от Серго1996

Прога выше

Это чо, мне твой код, штоль, смотреть? Нафига?
Просто сформулируй задачу.
Например:
надо такую функцию:
вх. данные: A: тип1, Б: тип2, ..., Ц: тип100500,
вых. данные: тип 100501.

Примеры прототипов:

Delphi
1
2
3
4
5
6
7
8
9
10
11
// ------------------------ Функции преобразований -----------------------------
// Перевод строки в системе счисления 10, 16, 8, 2 в целое число  
function AdvancedStr2Int(const AValue: string): Integer; 
 
// Определение системы счисления строкового представления целого числа
function IsValueSystem(const S: string; const ASystem: Byte): Boolean;
 
// Пpеобpазование целого числа N в строковое представление целого числа
// по основанию B, дополняя слева нулями до длины A и вставляя пробелы 
// через каждые С символов (0 - не вставляет)
function AdvancedDec2Numb(const N: Integer; const A, B, C: Byte): string;

@northener · 28.05.2015, 00:36

Сообщение от Серго1996

Я сделал прогу, теперь все арифметические действия в двоичной. Один косяк - перевод не пашет чет. Подлатай, пожалуйста ее.

Отвечу за Arcor. Надеюсь он не обидится.
Ты пока еще ничего не сделал, кроме написания бредового кода

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
rocedure TFMain.Button23Click(Sender: TObject);
var text:string;
i,kof,schet,otv:integer;
begin
  if radioButton1.Checked=true then kof:=2;
  if radioButton2.Checked=true then kof:=8;
  if radioButton3.Checked=true then kof:=10;
  if radioButton4.Checked=true then kof:=16;
  schet:=0;
  text:=floattostr(result);
  for i:=length(text) downto 1 do
  begin
    if text[i]='1' then
    begin
      schet:=schet+i*kof;
    end;
  end;
  result:=schet;
  edit1.Text:=floattostr(result);
end;

А этот код не латать надо, а выбрасывать на помойку и писать новый.
P.S. И кто тебя надоумил работать в твоей задаче с вещественными числами?

@Arcor · 28.05.2015, 00:55

Сообщение от Серго1996

Я сделал прогу, теперь все арифметические действия в двоичной. Один косяк - перевод не пашет чет. Подлатай, пожалуйста ее.

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

Сообщение от northener

Отвечу за Arcor. Надеюсь он не обидится.
Ты пока еще ничего не сделал, кроме написания бредового кода

Добавлено через 5 минут
кстати, ты это задание для себя родного делаешь, из своего же интереса? или по заданию учебного заведения и твоего интереса тут не очень много?
если первое, то толк будет с того, что тебе кусками дают, а с остальным сам разбираешься
если второе, то жаль личного времени делать то, что никому не нужно в итоге бует

Новые блоги и статьи Все статьи Все блоги /
Жизня: рисунок укладки багажа, сделанный клодом anaschu 21.08.2026 Сделал 15 снимков, он по снимкам сделал схему.	Был там один разговор по поводу свободы в материальном мире. kumehtar 19.08.2026 Суть: рассматривается живое существо, оказавшееся внутри довольно странной системы (этого мира) и пытающееся обустроить в ней свой кусок пространства. Жизнь действительно предъявляет каждому. . .	Когда логика программы не спасает от человеческих ошибок Maks 18.08.2026 В последнее время всё чаще и чаще сталкиваюсь с таким явлением, как абсолютная невнимательность (или глупость) пользователей. Проявляется это чаще всего на работе в коллективе. Допустим, человек с. . .	Лето уходит kumehtar 17.08.2026
Мысли в слух kumehtar 17.08.2026 Забавно, насколько сейчас стала доступна информация. Например о магии, духовном развитии, медитациях, и других подобных направлениях, ранее зачастую тайных, передаваемых от учителя к ученику. Хотя. . .	Перемещение строк из ТЧ в другой документ с учетом текущего пробега Maks 17.08.2026 Реализация из решения ниже выполнена на примере нетипового документа "Автозапчасти", с ТЧ "Шины". За основу взят алгоритм отсюда: https:/ / www. cyberforum. ru/ blogs/ 359708/ 10838. html Задача: . . .	Саморегулирующийся социальный контракт для сервера cross-section. Hrethgir 14.08.2026 С кодом конечно таких глубоких размышлений пока не было, впрочем я уже привык к алгоритмизации. Суть предмета записи: снова в диалоге с нейросетью (я взял пока себе ник для учётки админа - Rector). . . .	Часы электронные Uhbif79 12.08.2026 Выкладываю программу часов. Программа позволяет: 1. Использовать системное время и дату, 2. Есть возможность вводить время и дату вручную. 3. Реализованы 2 будильника: начало и конец рабочего дня. . . .

@Серго1996 0 / 0 / 0 Регистрация: 06.04.2015 Сообщений: 13

	Калькулятор программиста 27.05.2015, 00:16. Показов 4838. Ответов 25 Метки нет (Все метки) Тема такая. Есть калькулятор в 10СС, надо, чтобы он работал также в 2СС, 8СС и 16СС. Пожалуйста, сделайте пример для двоичной. Дальше сам попробую. Заранее огромное спасибо. П.С. алгоритм такой: пользователь вводит 1 число, выбирает арифметическое действие, потом вводит второе число, далее при нажатии кнопки равно оба числа переводятся в 10СС, выполняется ранее выбранное арифметическое действие и на выводе число переводится из 10СС в ту СС, которую выбрал пользователь изначально (в калькуляторе имеются 4 РадиоБаттона). 0

@Arcor 5709 / 2300 / 466 Регистрация: 20.11.2009 Сообщений: 7,721 Записей в блоге: 1
	27.05.2015, 13:51
	Zombi_sib,Проверяется там i-тая позиция бита в числе. Если там 1 то прибавляем 1к строке ну или 0 если там 0 в позиции. А вообще это побитовые операции. Очень интересная тема) Добавлено через 12 минут Изначально у нас 1, пусть будет 8 позиций. для представлегия байта. 0000 0001. Далее мы через shl двигаем 1 влево на каждой итерации. А так как операция и and дает единицу только в случае если и в числе и в маске 1 то результат будет 1 в любых других случаях будет 0 0

@Серго1996 0 / 0 / 0 Регистрация: 06.04.2015 Сообщений: 13
	27.05.2015, 23:59 [ТС]
	Arcor, Калькулятор программиста.rar Я сделал прогу, теперь все арифметические действия в двоичной. Один косяк - перевод не пашет чет. Подлатай, пожалуйста ее. 0

@Серго1996 0 / 0 / 0 Регистрация: 06.04.2015 Сообщений: 13
	28.05.2015, 00:01 [ТС]
	Verevkin, прога есть, теперь все действия в двоичной. Помоги подлатать перевод, а то он чет не пашет. Прога выше) 0

Опции темы