Работа с двоичными числами в Delphi

[Moneo]

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

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

т.е. тебя нагибают работать со строками?

а это можно обойти? например не выводить двоичные числа а сразу выполнить операцию и тогда уже вывести результат?

[начинающий кодер]

Сложение. Столбиком поразрядно 0+0=0 0+1=1 1+1=10
Вычитание можно вывести из сложения.логические функции - для этого существуют таблицы. Запрос в поисковик булева алгебра.

[Stilet]

Обойти то можно, но само задание поставлено так что преподаватель может твой обход расценить как попытку саботажа его гордости.
Вообще пишут функцию, которая переводит число в строку в двоичном представлении, и уже ей скармливают результаты операций на числах - сдвиги, XORы и прочее. А перевод используют только для вывода - это не сложно.
Но если твой препод задумал именно "эмуляцию" побитовой работы - проще выпить яда. Так что ты бы уточнил у него, можно ли просто выводить в виде строки результаты целочисленных операций или нет.

[Moneo]

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

Обойти то можно, но само задание поставлено так что преподаватель может твой обход расценить как попытку саботажа его гордости.
Вообще пишут функцию, которая переводит число в строку в двоичном представлении, и уже ей скармливают результаты операций на числах - сдвиги, XORы и прочее. А перевод используют только для вывода - это не сложно.
Но если твой препод задумал именно "эмуляцию" побитовой работы - проще выпить яда. Так что ты бы уточнил у него, можно ли просто выводить в виде строки результаты целочисленных операций или нет.

для него важно чтобы вышеописанные операции производились в двоичном виде и был вывод и ввод этих чисел, а все остальное он сказал можно делать как захочется. Я просто думал что через Edit'ы это можно как то просто решить.

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

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

а в интернете возможно найти код такой функции? Сам не разберусь.

[Stilet]

производились в двоичном виде

Видимо это все таки из разряда того о чем говорит начинающий кодер.
Не завидую с таким заданием.

В свое время когда нас доставали подобной гадостью я писал так:

  var i:integer;
  function q(a:integer):String;
  var i:integer;
  begin
   for i:=0 to 16 do begin
    if a and 1=0 then Result:='0'+Result else Result:='1'+Result;
    a:=a shr 1;
   end;
  end;

  function sdviglevo(s:string;i:integer):string;
  var k,e:integer;
  begin
   Result:=s;
   for k:=0 to i-1 do
    for e:=2 to length(s) do begin
     Result[e-1]:=Result[e];
     Result[e]:='0';
    end;
  end;
var s:string;
begin
 i:=54; s:=q(i);{Это перевод в двоичную}
 writeln(s);
 {Это сдвиг влево на 2 разряда}
 writeln(sdviglevo(s,2));
 readln;
  { TODO -oUser -cConsole Main : Insert code here }
end.

[Moneo]

Это как я понял сдвиг, а с остальным как быть?

[Stilet]

Ну по аналогии.
Это все что у меня осталось от контрольных

[Moneo]

ладно попробую, спасибо.