Предмет: Информатика,
автор: AbenShtrauz
плиз, помогите, ребят! в pascal abc нужно нарисовать флаг Нигерии
Ответы
Автор ответа:
0
uses GraphABC;
Begin
SetBrushColor(clGreen);
FillRect(0,0,WindowWidth,WindowHeight);
SetBrushColor(clWhite);
FillRect(9*(WindowWidth div 30),0,22*(WindowWidth div 30),WindowHeight)
End.
Begin
SetBrushColor(clGreen);
FillRect(0,0,WindowWidth,WindowHeight);
SetBrushColor(clWhite);
FillRect(9*(WindowWidth div 30),0,22*(WindowWidth div 30),WindowHeight)
End.
Похожие вопросы
Предмет: Русский язык,
автор: kirabayushta
Предмет: Биология,
автор: armankasymbekov23
Предмет: Русский язык,
автор: lenaalsajfi5
Предмет: Музыка,
автор: nmushtik