Паскаль. Сделайте пожалуйста светофор, самый простой. Скиньте скрин или напишите код. Дам как можно больше баллов.

Если для того, чтобы разобраться в процедурах, то вот самый простой код, рисующий черный прямоугольник и три круга. program sneg; uses graphABC; begin setwindowsize(300,500); setbrushcolor(clblack); fillRectangle(100,100,200,400); setbrushcolor(clred); circle(150,150,40); setbrushcolor(clyellow); circle(150,250,40); setbrushcolor(clgreen); circle(150,350,40); end.