Тема: Помогите, пожалуйста, решить задачу в qbasic
Показать сообщение отдельно
Старый 30.11.2011, 11:20   #2 (permalink)
Ultras
Member
 
Аватар для Ultras
 
Регистрация: 17.05.2010
Адрес: Казань
Сообщений: 6,044
Записей в дневнике: 13
Сказал(а) спасибо: 42
Поблагодарили 2 раз(а) в 1 сообщении
Репутация: 30182
По умолчанию
DATA "Олег", "увидел", "вокруг", "31", и так далее
FOR a% = 0 TO 11
READ a$
PRINT LEFT$ (a$, 1)
NEXT
END

Как-то так, вроде...
Ultras вне форума   Ответить с цитированием
Ads

Яндекс

Member
 
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070