Составить программу, определяющую, на какую букву начинается второе слово в предложении

Категория: Basic

2011-12-29 16:13:43

code: #basic

INPUT "vvedite predlojenie ",a$
FOR i=LEN(a$) TO 1 step-1
IF MID$(a$,i,1)=" "THEN b$=MID$(a$,i+1,1)
NEXT
PRINT "eto bukva=";b$

автор: кот Бегемот

Поделиться:

Sample Code