Создать число по двум байтам

[@нтошка]

Доброго времени суток, уважаемые программисты

Суть задачи такова: как мне записать неотрицательное число в 2 байта и достать его обратно Т.е. это число будет в диапазоне 0..65025 . Помогите, кто чем может.

[BDA]

Честно говоря, не понял вопроса.
Расскажите подробнее.
Во-первых, 0..65535.
Во-вторых, это тип word - 2 байта, неотрицательное число.

uses
  crt;

var
  a, b: byte;
  c: word;

begin
  write('Input first byte: ');
  readln(a);
  write('Input second byte: ');
  readln(b);
  c := a shl 8 + b;
  writeln('2-byte number: ', c);
  readln;
end.

Т.к. не понял, чего вы хотите, вот программа, собирающая из 2 однобайтовых чисел 1 двухбайтовое.

[Poma][a]

Тоесть введется 2 двоичных числа? И из низ нужно "склеить" 1 десятиричное?
И 1(введеный) байт у вас старший или младший? (например в Intel меньший байт по меньшему адресу)

[@нтошка]

Поясняю: да , мне действительно нужно из двух однобайтовых чисел получить одно двухбайтовое.

[s-andriano]

Это можно сделать тысячей разных способов. Который из них Вам нужен?

[@нтошка]

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

[Smitt&Wesson]

Да, блин, в чём проблема.
Если числа шестнадцетиричные старшее умножаем на 256 затем суммируем младшее и записывем в любой подходящий тип.
Делов на две секунды, а холивара - на пол дня.

[veniside]

Если числа шестнадцетиричные старшее умножаем на 256

<flame.mode="on">
не, надо так:
- если числа шестнадцетиричные, старший байт умножаем на $100
- если числа десятичные, старший байт умножаем на 256
- если числа восьмиричные, старший байт умножаем на 400
- если числа двоичные, старший байт умножаем на 100000000
<flame.mode="off">

[s-andriano]

Сообщение от @нтошка

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

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