Пожалуйста, помогите!
Решить задачу шифровки и дешифровки по следующему принципу: За каждой буквой данной фразы стоит случайная гласная( их 9 - у, е, ы, а, о, э, я, и, ю), затем случайная согласная ( их 20 - ц, к, н, г, ш, щ, з, х, ф, в, п, р, л, д, ж, ч, с, м, т, б), затем случайная ни та, ни другая ( их 3 - ъ, ь, й) и т.д.
С DATA без массивов.
Программа создаётся через язык программирования QBasic.  

На самом деле здесь DATA введены только потому, что так сказано в задании, потому что они не нужны, можно было сделать просто операторы присваивания вида s10="ауоыэяюёие", либо даже объявить константы CONST s10="ауоыэяюёие".

Вот спасибо Вам большое и за помощь, и за разъяснение! Хлопаю и аплодирую стоя, Вы выручили и спасли меня. Ещё раз, спасибо большое за помощь! Эм, и баллы Вы заслуженные получили (а то я тут новенькая, не во всём, как следует разобралась)?

Вот спасибо Вам большое и за помощь, и за разъяснение! Хлопаю и аплодирую стоя, Вы выручили и спасли меня. Ещё раз, спасибо большое за помощь!

Баллы меня совершенно не волнуют, если что))