Нужно в Basic нарисовать рисунок с мерцанием (программу саму напишите, и подпишите что...

Question

Нужно в Basic нарисовать рисунок с мерцанием (программу саму напишите, и подпишите что это), очень нужно. Помогите, кто может.

Answer 1

SCREEN 12
CIRCLE (100, 100), 50, 15
DO WHILE C < 100
    C = C + 1
    IF C = 15 THEN C = 0
    PAINT (100, 100), C, 15
LOOP