Запрашивая у пользователя N производных слов, построить из них предложение. Слова разделить пробелами — QBasic(Бейсик)

disel
1
2
3
4
5
6
7
8
9
10
INPUT "vvedite kolichestvo slov ", n
DIM a$(n)
FOR i = 1 TO n
    INPUT "vvedite slovo ", a$(i)
NEXT
PRINT "predlojenie:"
FOR i = 1 TO n
    b$ = b$ + a$(i) + " "
NEXT
PRINT b$

Тестирование выполнено в программе QB64 ( Скачать )

Похожие записи/страницы:

Leave a Comment