Между всеми символами строки вставить символ '-'. Формат ввода: s - строка Формат вывода: t - новая строка Пример ввода: PRIMER Пример вывода: P-R-I-M-E-R
Очень похоже на предыдущую задачу. Почему не делаете самостоятельно?
INPUT a$FOR i = 1 TO LEN(a$) b$ = MID$(a$, i, 1) IF i = LEN(a$) THEN ELSE h$ = h$ + b$ + "-" END IFNEXT iPRINT h$ + b$