написать программу, которая нарисует звездное небо из 500 звезд (разноцветными точками)!
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
Оцени ответ
Вход
Регистрация
Задать вопрос
написать программу, которая нарисует звездное небо из 500 звезд (разноцветными точками)!
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