Помогите с задачей по информатике, язык QBasic. Дано слово, поменять в нём все чётные буквы на заданную

Четная буква -- это что за зверь?
Меняет буквы в строке стоящие на четных позициях на заданную:

INPUT "string"; s$
INPUT "letter"; a$
FOR i = 2 TO LEN(s$) STEP 2
MID$(s$, i, 1) = a$
NEXT
PRINT "result: "; s$