Напишите программу для того, чтобы нарисовать светофор, а сверху надпись "КРАСНЫЙ

Напишите программу для того, чтобы нарисовать светофор, а сверху надпись "КРАСНЫЙСВЕТ-ДОРОГИ НЕТ!" в ABC Pascal. ДАМ ДВАДЦАТЬ БАЛЛОВ. ПОМОГИТЕ!
Гость
Ответ(ы) на вопрос:
Гость
// PascalABC.NET 3.1, сборка 1198 от 11.03.2016 uses GraphABC; begin   SetFontColor(clRed);   SetFontSize(16);   TextOut(50,50,'Красный свет - дороги нет!');   Pen.Width:=3;   DrawRectangle(140,100,240,300);   Pen.Width:=1;   Brush.Color:=clRed;   Circle(190,150,20);   Brush.Color:=clYellow;   Circle(190,200,20);   Brush.Color:=clLightGreen;   Circle(190,250,20); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы