0
0
Последний раз редактировалось JeRrS; 21.01.2013 в 17:57.
Группа в ВК, посвященная кассетным версиям игр для спектрума
В коллекции:GRM-128 (YM+TR-DOS), Кворум 128+, Дельта 128, Эксперт-006, Рифей-01, Квант V3.а, Квант (Didaktik), Спектр БК-001, Sintez-M (Intercompex), Компаньон-2 (V2.2)
С любовью к вам, Yandex.Direct
Размещение рекламы на форуме способствует его дальнейшему развитию
а дробную часть она переводит?
С уважением, Александр.
Scorpion ZS-256 Turbo+ GMX-2048
SID-Blaster/ZX
Музей ретрокомпьютеров в Минске!
Здесь ничего нет => http://byteman.by
И здесь тоже --->>> http://bytespace.by
Просто у нас как раз в этом семестре по курсу АиЛОВТ был перевод из любый СС в любую, дык когда я узнал, что можно ещё и дробную часть числа адекватно переводить, я был просто в а*уе А переводится банально - методом умножения на основание новой СС. Умножили дробную часть - получили целую, запомнили целую часть, отбросили. Потом - опять... И так до бесконечности (лтбо пока не достигнута заданная точность, либо пока не получится нуль.
С уважением, Александр.
Scorpion ZS-256 Turbo+ GMX-2048
SID-Blaster/ZX
Музей ретрокомпьютеров в Минске!
Здесь ничего нет => http://byteman.by
И здесь тоже --->>> http://bytespace.by
http://tinyurl.com/38tcjox - ликбез
http://tinyurl.com/36znpyj - перевод с дробной частью
---------- Post added at 14:47 ---------- Previous post was at 14:11 ----------
Перевод целого десятичного числа в двоичное:
Код:13 REM (C) LAS 2011 14 INPUT "input num=";n: REM vvedite luboe tseloe chislo 15 LET px=31: LET py=0: REM startovie koordinaty pechati 20 LET ch= INT (n/2): REM chastnoe 30 LET ost=n-(ch*2): REM ostatok 40 PRINT AT py,px;ost: LET px=px-1: REM print bit 50 LET n=ch: IF n <> 0 THEN GO TO 20: REM prohodim vse bity
---------- Post added at 14:58 ---------- Previous post was at 14:47 ----------
Вот еще отличная статья Ивана Рощина с программой-калькулятором (hex dec bin) на бейсике (есть исходный текст программы на бейсике):http://ivr.webzone.ru/articles/ivr_calc/index.htm
Как все сложно. На БК для целых:
10 INPUT X
20 ? BIN$(X)
Вообще-то на спектруме есть Beta Basic:
Код:BIN$(n) - преобразование десятичного числа в двоичную строку; DEC(строка) - преобразование строки, содержащей шестнадцатиричное число; HEX$(n) - преобразование десятичного числа в шестнадцатиричную строку; USING$(формат, число) - знаковая запись числа в заданном формате.
Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)