1 2 3 4 5 | INPUT "vvedite predlojenie ",a$FOR i=LEN(a$) TO 1 step-1IF MID$(a$,i,1)=" "THEN b$=MID$(a$,i+1,1)NEXTPRINT "eto bukva=";b$ |
1 2 3 4 5 | INPUT "vvedite predlojenie ",a$FOR i=LEN(a$) TO 1 step-1IF MID$(a$,i,1)=" "THEN b$=MID$(a$,i+1,1)NEXTPRINT "eto bukva=";b$ |