Текст из строки символов, заканчивающийся символом точка с запятой - QBasic

В строке имеется несколько знаков точка с запятой. Организовать текст из строки символов, заканчивающийся символом точка с запятой. Помогите решить.

Листинг программы

INPUT a$
PRINT (LEFT$(a$, INSTR(1, a$, ";")))
END

Объяснение кода листинга программы

Вводится строка символов, заканчивающаяся символом точка с запятой, в переменную a$
Вычисляется позиция первого вхождения символа точка с запятой в строке a$, и сохраняется в переменную INSTR(1, a$, ;)
Вычисляется количество символов слева от позиции первого вхождения символа точка с запятой до начала строки, и сохраняется в переменную LEFT$(a$, INSTR(1, a$, ;))
Выводится значение переменной LEFT$(a$, INSTR(1, a$, ;))
Код завершается