Скачать: CL | DM;

Логические операции   Найти похожие ветки 

← →
Виталик   (2004-03-18 12:01) [0]

Хай
Есть несколько (их много :() последовательностей цифр (12 символов 0 и 1) и необходимо их прогнать через AND
Делаю
-----------------
var x,y,z: Int64;
-----------------
X:=111011010110;
Y:=100011110110;
Z:=X and Y;
получается фигня полная :(
Как решить данную проблему ... не перебирать же все через copy

---

← →
Algol   (2004-03-18 12:05) [1]

X:=$111011010110b;
Y:=$100011110110b;

---

← →
Cobalt ©   (2004-03-18 12:06) [2]

К сожалению, задание значения целого числа в двоичном виде в Паскале не предусмотрено. Но вы можете указать в 16-ом вормате, например:
x:=$ED6;
z:= ...

---

← →
Cobalt ©   (2004-03-18 12:09) [3]

> Algol  
А вот это даже не скомпилируется.

---

← →
Ozone ©   (2004-03-18 12:09) [4]

А ты че получить-то хотел таким образом?

---

← →
Ozone ©   (2004-03-18 12:13) [5]

Ну пиши:

x := 3797
y := 2294;
z = x and y

Получишь z = 2260 (100011010100)

---

← →
Algol   (2004-03-18 12:26) [6]

>Cobalt
>А вот это даже не скомпилируется.

Оно не только скомпилируется, оно даже будет работать ))

---

← →
Плохиш   (2004-03-18 12:32) [7]

> Algol   (18.03.04 12:26) [6]
> Оно не только скомпилируется, оно даже будет работать ))

Нука скажи чему равно $111011010110b в двоичном виде?

---

← →
Algol   (2004-03-18 12:47) [8]

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

var x,y,z: Integer;
begin
asm
mov X, 111011010110b;
mov Y, 100011110110b;
end;
Z:=X and Y;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.02 c