SCRЕЕN 12 INPUT “Сколько звезд на небе”; NFOR n=1 TO NX= RND(1)*640Y= RND(1)*480Z=RND(1)* 15PSET (X,Y),ZNEXT N
SCRЕЕN 12
INPUT “Сколько звезд на небе”; N
FOR n=1 TO N
X= RND(1)*640
Y= RND(1)*480
Z=RND(1)* 15
PSET (X,Y),Z
NEXT N