Re: qbasic

не помню точно:
mid(a,10,1) - выдаст элемент 10 из строчки а
Igor
-----Original MessageFrom: Alexander Michajlovich de Kanner
[mailto:Alexandr_de_Kann***@r*****.ru]
Sent: Friday, January 16, 2004 12:47 PM
To: comp.soft.prog.prog
Спасибо, попробуем ответим.
Строка символов у нас храняться в символьном массиве.
Нам достаточно только управляющих оператов чтения по символам из массива.
Спасибо.
-----Original MessageFrom: Малышев Георгий [mailto:individ***@y*****.ru]
Sent: Thursday, January 15, 2004 5:06 PM
To: comp.soft.prog.prog (2840326)
Можно сделать ТАК:
CLS
s$ = ""
s2$ = ""
INPUT s$
s2$ = MID$(s$, 1, 1)
FOR i = 2 TO LEN(s$)
s2$ = s2$ + MID$(s$, i, 1)
NEXT i
PRINT s2$
Или имеется ввиду, что это сделать надо статически (из редактора)то так:
"h"+"v"+"b"+"l"+"v"+..."b"
Может можно сделать как - ни будь по КРАСИВЕЕ,
я qbasic уже забыл :-(
Пока!
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru
http://subscribe.ru/ mailto:ask@subscribe.ru
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru
Получить правила : mailto:comp.soft.prog.prog-rules@subscribe.ru
Формат "дайджест" : mailto:comp.soft.prog.prog-digest@subscribe.ru
Формат "каждое письмо" : mailto:comp.soft.prog.prog-normal@subscribe.ru
Формат "читать с веба" : mailto:comp.soft.prog.prog-webonly@subscribe.ru
-*Информационный канал Subscribe.Ru
Написать в лист: mailto:comp.soft.prog.prog-list@subscribe.ru
Отписаться: mailto:comp.soft.prog.prog--unsub@subscribe.ru
http://subscribe.ru/ mailto:ask@subscribe.ru