Вопрос по информатике:
Составить программу в ABCpascal , которая рисует графический дом и раскрашивает его.(9класс)
Пожаловаться
- 23.05.2018 23:03
- Информатика
- remove_red_eye 7533
- thumb_up 48
Ответы и объяснения 1
Uses GraphABC;
Begin
SetWindowSize(600, 400);
SetPenWidth(3);
SetBrushColor(clYellow);
Rectangle(40,160,280,380);
SetBrushColor(clSkyBlue);
Rectangle(80,200,240,300);
Line(80,240,240,240);
Line(160,240,160,300);
SetBrushColor(clGreen);
Rectangle(280,320,380,380);
Rectangle(380,340,460,380);
Line(40,160,160,20);
Line(160,20,280,160);
FloodFill(160,80,clMaroon);
SetBrushColor(clBlue);
Circle(160,100,30);
Line(130,100,190,100);
Line(160,70,160,130);
End.
Результат выполнения на рисунке.
Begin
SetWindowSize(600, 400);
SetPenWidth(3);
SetBrushColor(clYellow);
Rectangle(40,160,280,380);
SetBrushColor(clSkyBlue);
Rectangle(80,200,240,300);
Line(80,240,240,240);
Line(160,240,160,300);
SetBrushColor(clGreen);
Rectangle(280,320,380,380);
Rectangle(380,340,460,380);
Line(40,160,160,20);
Line(160,20,280,160);
FloodFill(160,80,clMaroon);
SetBrushColor(clBlue);
Circle(160,100,30);
Line(130,100,190,100);
Line(160,70,160,130);
End.
Результат выполнения на рисунке.
Пожаловаться
- 24.05.2018 11:57
- thumb_up 32
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы