{* Задача32 *}

REM basic

' Нужно вставить новое слово в текст из 3-х слов после первого слова.


CLS
INPUT "vvedite Text"; a$
INPUT "vvedite slovo"; b$
Do
    i = i + 1
    If Mid$(a$, i, 1) = " " Then k = i
Loop Until k > 0 Or i = LEN(a$)
c$ = Mid$(a$, 1, k) + b$ + " " + Mid$(a$, k + 1, LEN(a$))
PRINT c$
End