Если у кого есть идеи, поделитесь пожалуйста: 1)Выполнить задание, используя побитовую обработку структур данных. За-дано натуральное число в формате word. Вывести на экран битовое представле-ние в ЭВМ этого числа.
klem4
16.11.2006 22:59
Поиск -> Системы счисления
.::tsalik::.
19.11.2006 17:32
Код
program _WordToBin_;
uses Crt;
const MaxWord: Word = 65535;
var Number, Marker: Word;
begin ClrScr; WriteLn; Write('Number: '); Read(Number); WriteLn; Marker := MaxWord shl 15; while Marker <> 0 do begin if Marker and Number <> 0 then Write(1) else Write(0); Marker := Marker shr 1; end; ReadKey end.
Прога как раз использует особенности двоичного представления. Проверки допиши сам.
Vania
20.11.2006 23:54
Круто! Спасибо!
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.