profile
Опубликовано 5 лет назад по предмету Информатика от ShadyNastya

Пожалуйста, ребят, вы же гении информатики!нужно написать программу в QBASIC , которая нарисует звездное небо из 500 звезд (разноцветными точками)!

  1. Ответ
    Ответ дан PsyhoAssasin

    SCREEN 12
    RANDOMIZE TIMER
    FOR I = 1 TO 500
    x = INT(RND * 639) + 1
    y = INT(RND * 479) + 1
    c = INT(RND * 15) + 1
    PSET (x, y), c
    NEXT I
    END

     

     

     

Самые новые вопросы