REM Start of BASIC!Program

ss$="Однажды_в_студенную_зимнюю_пору_я_из_лесу_вышел_был_сильный_мороз_"

split ss$[],ss$,""

for i=1 to 66 step 2

s$=mid$(ss$,i,2)

print s$

next i