При нажатии клавиши «Д» (день) рисует солнце, при нажатии клавиши «Н» (ночь) рисует луну.»- QBasic(Бейсик)

SCREEN 12
INPUT "risovat den ili noch(l/y)"; a$
IF a$ = "l" THEN a = 14 ELSE a = 15
CIRCLE (200, 200), 100, a
PAINT (200, 200), a, a

Тестирование выполнено в программе QB64 ( Скачать )