zadacht14.BAS

{* Задача14 *}

REM basic

' Удалить символ номер N=5 из A$.


CLS
A$ = "123456789": N = 5: x = LEN(A$)
        A$ = Mid$(A$, 1, N - 1) + Mid$(A$, N + 1, x)
PRINT A$
End