Составить программу в Pascal ABC которая нарисует светофор и букву Р.

Question

Составить программу в Pascal ABC которая нарисует светофор и букву Р.

Answer 1

Так?

uses graphabc;
begin
setwindowsize(245,340);
setbrushcolor(clblack); rectangle(20,20,120,320);
setbrushcolor(clred); circle(70,70,50);
setbrushcolor(clyellow); circle(70,170,50);
setbrushcolor(clgreen); circle(70,270,50);
line(150,20,150,320); arc(150,95,75,-90,90)
end.

Comments

а букву Р

---

Так ведь рисует ее справа от светофора.

---

Букву Р отдельно - это уже другая программа.

---

Сказали бы сразу. line(150,20,150,320); arc(150,95,75,-90,90) - это буква Р

---

Спасибо большое.