Паскаль. Сделайте пожалуйста светофор, самый простой. Скиньте скрин или напишите код. Дам как можно больше баллов.
Ответы
Ответ дал:
0
Если для того, чтобы разобраться в процедурах, то вот самый простой код, рисующий черный прямоугольник и три круга.
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.
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.
Ответ дал:
0
Спасибо большое
Вас заинтересует
2 года назад
8 лет назад
8 лет назад
10 лет назад
10 лет назад