Вопрос по информатике:
В паскале нужно нарисовать дерево елочка дерево.Все должно быть в одном окне
- 11.02.2018 08:31
- Информатика
- remove_red_eye 3363
- thumb_up 42
Ответы и объяснения 1
Uses
GraphABC;
begin
SetPenColor(ClGreen);
Line(100,100,120,140);
Line(100,100,80,140);
Line(80,140,120,140);
Line(100,140,70,190);
Line(100,140,130,190);
Line(70,190,130,190);
Line(100,190,50,250);
Line(100,190,150,250);
Line(50,250,150,250);
FloodFill(100,160,clGreen);
FloodFill(100,130,clGreen);
FloodFill(100,200,clGreen);
Line(300,100,320,140);
Line(300,100,280,140);
Line(280,140,320,140);
Line(300,140,270,190);
Line(300,140,330,190);
Line(270,190,330,190);
Line(300,190,250,250);
Line(300,190,350,250);
Line(250,250,350,250);
FloodFill(300,160,clGreen);
FloodFill(300,130,clGreen);
FloodFill(300,200,clGreen);
Line(500,100,520,140);
Line(500,100,480,140);
Line(480,140,520,140);
Line(500,140,470,190);
Line(500,140,530,190);
Line(470,190,530,190);
Line(500,190,450,250);
Line(500,190,550,250);
Line(450,250,550,250);
FloodFill(500,160,clGreen);
FloodFill(500,130,clGreen);
FloodFill(500,200,clGreen);
end.
- 12.02.2018 16:15
- thumb_up 22
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.