Хотел бы попросить помочь мне перевести программу из Visual Basic в qBasic. Или помочь найти конвертер... - VB
Формулировка задачи:
Добрый день! Хотел бы попросить помочь мне перевести программу из Visual Basic в qBasic. Или помочь найти конвертер...
Решение задачи: «Хотел бы попросить помочь мне перевести программу из Visual Basic в qBasic. Или помочь найти конвертер...»
textual
Листинг программы
INPUT "введите фразу"; s$ n = LEN(s$) FOR i = 2 TO n FOR j = n TO i STEP -1 IF ASC(MID$(s$, j - 1, 1)) < ASC(MID$(s$, j, 1)) THEN x$ = MID$(s$, j - 1, 1) MID$(s$, j - 1, 1) = MID$(s$, j, 1) MID$(s$, j, 1) = x$ END IF NEXT NEXT PRINT s$ END
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д