SCREEN 0
LOCATE 2,2
INPUT " CO CHCES SCOPIROVAT " ;COPY$
LOCATE 12,2
PRINT COPY$
FOR SPOMAL=1 TO 15555
NEXT SPOMAL
END