1 2 | INPUT "vvedite stroku", a$PRINT LEFT$(a$, LEN(a$) - 2) |
Следующий вариант
1 2 3 4 5 | INPUT "vvedite text ", a$FOR i = 1 TO LEN(a$) - 2 b$ = b$ + MID$(a$, i, 1)NEXTPRINT b$ |
Тестирование выполнено в программе QB64 ( Скачать )
1 2 | INPUT "vvedite stroku", a$PRINT LEFT$(a$, LEN(a$) - 2) |
Следующий вариант
1 2 3 4 5 | INPUT "vvedite text ", a$FOR i = 1 TO LEN(a$) - 2 b$ = b$ + MID$(a$, i, 1)NEXTPRINT b$ |
Тестирование выполнено в программе QB64 ( Скачать )