Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.71/7: Рейтинг темы: голосов - 7, средняя оценка - 4.71
0 / 0 / 0
Регистрация: 06.04.2020
Сообщений: 32

Разделить байт на две части

25.09.2023, 18:50. Показов 2425. Ответов 53

Студворк — интернет-сервис помощи студентам
здравствуйте имеется считанный байт к проимеру 85327977 его надо разделить на две части
Code
1
2
3
z3:=a and $FFFF;
z4:=a shr 16;
z3:=z3+z4;
а можно как то по другому сделать?
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
25.09.2023, 18:50
Ответы с готовыми решениями:

Разделить массив на две части
1. Разделить массив на две части, поместив в первую элементы, большие среднего арифметического их суммы,а во вторую-меньшие. 2. Дан...

Разделить набор цифр на две части
здравствуйте скажите вот такой вопрос: есть 2 едита я ввожу в один 13 значий набор цифр как мне сделать что бы во втором едите появились...

Разделить строку на две части по следующему правилу
Помогите пожалуйста с задачами: 1. Разделить строку на две части по следующему правилу: все цифры остаются в первой строке, все остальные...

53
0 / 0 / 0
Регистрация: 06.04.2020
Сообщений: 32
26.09.2023, 15:13  [ТС]
Студворк — интернет-сервис помощи студентам
я его разделил вот так
Code
1
2
3
4
5
6
7
a :dword;
z3,z4: word;
 
a:= $85327977
z3:=a and $FFFF;
z4:=a shr 16;
z3:=z3+z4;
еще один вопрос считование из бинарного файла по байту и сложение их со сдвигом на лево к примеру
$85 сдвиг на лево $8500 считование $32 в итоге $8532 считать $79 сдвиг на лево $7900 и $8532 + $7900 = FE32 считать $77 и $FE32 + $77 = $FEA9
0
Злостный нарушитель
 Аватар для Verevkin
10887 / 5823 / 1288
Регистрация: 12.03.2015
Сообщений: 26,884
26.09.2023, 15:17
Цитата Сообщение от AET1 Посмотреть сообщение
по байту и сложение их со сдвигом на лево к примеру
Читай по 4 байта.
0
0 / 0 / 0
Регистрация: 06.04.2020
Сообщений: 32
26.09.2023, 17:58  [ТС]
Code
1
2
3
4
outStream.Read(z1,2);
  z1:= ((z1 and $FF) shl 8)or((z1 and $FF00) shr 8);
outStream.Read(z2,2);
  z2:= ((z2 and $FF) shl 8)or((z2 and $FF00) shr 8);
сделел так. подскажите как сделать если в конце файла остается один байт
0
Злостный нарушитель
 Аватар для Verevkin
10887 / 5823 / 1288
Регистрация: 12.03.2015
Сообщений: 26,884
26.09.2023, 18:04
Цитата Сообщение от AET1 Посмотреть сообщение
подскажите как сделать если в конце файла остается один байт
Чо за файл? Зачем его читать, и что делать с прочитанными данными?
0
Модератор
4153 / 2362 / 814
Регистрация: 15.11.2015
Сообщений: 9,496
26.09.2023, 18:12
Цитата Сообщение от AET1 Посмотреть сообщение
сделел так.
Чем считать в 2 байтовую переменную и поменять байты местами, не проще ли считать по байту и поместить сразу в нужном порядке?

Цитата Сообщение от AET1 Посмотреть сообщение
как сделать если в конце файла остается один байт
Ничего. Он же один.
0
Злостный нарушитель
 Аватар для Verevkin
10887 / 5823 / 1288
Регистрация: 12.03.2015
Сообщений: 26,884
26.09.2023, 18:18
Цитата Сообщение от AzAtom Посмотреть сообщение
Чем считать в 2 байтовую переменную и поменять байты местами, не проще ли считать по байту и поместить сразу в нужном порядке?
Да погоди ты! Надо ж узнать, нахрена он это всё делает.
0
Модератор
4153 / 2362 / 814
Регистрация: 15.11.2015
Сообщений: 9,496
26.09.2023, 18:22
Verevkin, мне кажется, ему через com-порт кто-то данные отправляет в виде big-endian.

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

Запутал товарищ.
0
Злостный нарушитель
 Аватар для Verevkin
10887 / 5823 / 1288
Регистрация: 12.03.2015
Сообщений: 26,884
26.09.2023, 18:34
Цитата Сообщение от AzAtom Посмотреть сообщение
мне кажется, ему через com-порт кто-то данные отправляет в виде big-endian.
Пусть сам колется. А то щас дованговаться можно до настоящих убивцев Кеннеди.
Автор, колись довай!



Добавлено через 4 минуты
Пойду ужинать. Скоро вернусь.
Интересно, чем этот дурдом закончится...
0
0 / 0 / 0
Регистрация: 06.04.2020
Сообщений: 32
27.09.2023, 19:18  [ТС]
Цитата Сообщение от AzAtom Посмотреть сообщение
Чем считать в 2 байтовую переменную и поменять байты местами, не проще ли считать по байту и поместить сразу в нужном порядке?
да я так и сделал но при подсчете выдавало на 1 значение больше
Цитата Сообщение от Verevkin Посмотреть сообщение
Пусть сам колется. А то щас дованговаться можно до настоящих убивцев Кеннеди.
Автор, колись довай!
нет )
0
Злостный нарушитель
 Аватар для Verevkin
10887 / 5823 / 1288
Регистрация: 12.03.2015
Сообщений: 26,884
27.09.2023, 19:24
Цитата Сообщение от AET1 Посмотреть сообщение
нет )
0
пофигист широкого профиля
4770 / 3207 / 862
Регистрация: 15.07.2013
Сообщений: 18,615
28.09.2023, 02:10
Цитата Сообщение от AzAtom Посмотреть сообщение
Verevkin, мне кажется, ему через com-порт кто-то данные отправляет в виде big-endian.
Мне тоже.
0
242 / 208 / 36
Регистрация: 19.02.2021
Сообщений: 1,431
28.09.2023, 08:46
Цитата Сообщение от AzAtom Посмотреть сообщение
мне кажется, ему через com-порт кто-то данные отправляет в виде big-endian.
Ситуация... Обслуживать поток данных через порт, не понимая, что такое байт)))
0
Злостный нарушитель
 Аватар для Verevkin
10887 / 5823 / 1288
Регистрация: 12.03.2015
Сообщений: 26,884
28.09.2023, 08:54
Цитата Сообщение от Constcat Посмотреть сообщение
Ситуация... Обслуживать поток данных через порт, не понимая, что такое байт)))
0
0 / 0 / 0
Регистрация: 06.04.2020
Сообщений: 32
30.09.2023, 15:55  [ТС]
Цитата Сообщение от AzAtom Посмотреть сообщение
Чем считать в 2 байтовую переменную и поменять байты местами, не проще ли считать по байту и поместить сразу в нужном порядке?
Code
1
2
3
4
outStream.Read(a1,1);
  z1:= a1 shr 8;
outStream.Read(a2,1);
  z2:= a2 and $FF;
это подсчет MD5 контрольной суммы
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
30.09.2023, 15:55

Разделить цепочку символов на две - равные девяти байт каждая
Ввести строку символьных данных, задавая буфер равный 18 байт. Разделить цепочку на две - равные девяти байт каждая, выдать на экран эти...

Разделить слово на две части
"Сложное слово состоит из двух частей одинаковой длинны и соединительной гласной. Найдите обе части этого слова." Нужно вписать...

Разделить массив на две части
Помогите с решением задачи. Условие вот такое "дан массив целых чисел, лежащих в диапазоне , размерность массива - 10. Разделить массив на...

Разделить число на две части
Подскажите пожалуйста как разделить число на две части: int year = 2011; нужно разделить чтобы : int N1 = 20; ...

Разделить e-mail на две части
Приветствую уважаемый форум! Помогите пожалуйста, никак не осилю простую, казалось бы, задачку: В первом аргументе к скрипту...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
54
Ответ Создать тему
Новые блоги и статьи
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
Запрет дублирования строк в табличной части
Maks 13.09.2026
Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр.
Jin X 06.09.2026
Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
Программа опроса у.з. расходомера SLS-720F
Argus19 02.09.2026
Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .
Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0.
Maks 31.08.2026
При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .
Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм
anaschu 30.08.2026
Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .
Оттачиваю умение писать js программы.
russiannick 30.08.2026
Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .
мат медиц модель 30. презентация проекта
anaschu 27.08.2026
хоп хоп хоп хидахоп, а я кладую))
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru