![]() |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
![]() |
DiSkEtKa |
![]()
Сообщение
#1
|
Пионер ![]() ![]() Группа: Пользователи Сообщений: 55 Пол: Женский Репутация: ![]() ![]() ![]() |
В общем у меня задание такое: нужно перевести знаковое число типа word
в шестнадцатеричную строку.. Пожскажите пожалуйста как можно следить за знаком(если отр число то переводить его абс. величину чтоли?), если нам дано конекретное чило а, а не массив..я не могу никак додуматься.. ![]() Код program dva; uses crt; var a,i:byte; t:array[1..8] of word; begin clrscr; writeln('vvedite a'); readln(a); i:=1; repeat t[i]:=a mod 16 +65; a:=a div 16; i:=i+1 until a=0; for i:=1 to 3 do write(t[i]); end. |
![]() ![]() |
volvo |
![]()
Сообщение
#2
|
Гость ![]() |
Очень интересно...
chr(a mod 16+48);, значит тебе можно использовать, а написать свою функцию - нельзя? Ну, тогда дорабатывай... Я велосипедостроением не занимаюсь. Если есть уже написанная и отлаженная функция, я предпочитаю использовать ее. А не используешь - зачем Паскаль учишь? Учи Бейсик, там тоже преподаватели предпочитают чтоб всё без функций было сделано ![]() |
![]() ![]() |
![]() |
Текстовая версия | 12.08.2025 5:51 |