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

Категория: Basic

2011-12-29 16:11:30

code: #basic

INPUT "vvedite predlojenie ",a$
FOR i=1 TO LEN(a$)
IF MID$(a$,i,1)=" " THEN EXIT FOR
n=n+1
NEXT
PRINT"dlina 1 slova=";n

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

Поделиться:

Sample Code