Перевод в qbasic из 10cc в 2cc
Категория: Basic
2011-10-25 14:14:34
code: #basic
INPUT n DO a$ = LTRIM$(STR$(n MOD 2)) + a$ n = n \ 2 LOOP UNTIL n = 0 PRINT a$
автор: кот Бегемот
Поделиться:
INPUT n DO a$ = LTRIM$(STR$(n MOD 2)) + a$ n = n \ 2 LOOP UNTIL n = 0 PRINT a$
автор: кот Бегемот