Задание:
Составить программу в Pascal ABC которая нарисует светофор и букву Р.
Решение:
Так? uses graphabc; beginsetwindowsize (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.
Знаете другой ответ?