Вопрос по информатике:
Даны три прямоугольника, каждого из которых известны координаты вершин одной диагонали: 1) 20, 20 и 80, 200;
2) 200, 97 и 500, 156;
3) 300, 120 и 400, 420. Составьте программу, которая рисует эти прямоугольники красным, жёлтым и зелёным цветами, соответственно.
ЯЗЫК ПРОГРАММИРОВАНИЯ ПАСКАЛЬ
- 17.01.2017 23:08
- Информатика
- remove_red_eye 6877
- thumb_up 22
Ответы и объяснения 2
uses graphABC;
begin
setpencolor (clRed);
line(20,20,20,200);
line(20,200,80,200);
line(80,200,80,20);
line(80,20,20,20);
setpencolor (clYellow);
line(200,97,200,156);
line(200,156,500,156);
line(500,156,500,97);
line(500,97,200,97);
setpencolor (clGreen);
line(300,120,300,420);
line(300,420,400,420);
line(400,420,400,120);
line(400,120,300,120)
end.
- 18.01.2017 07:26
- thumb_up 46
begin
Window.SetSize(600,500);
setpenwidth (2);
setpencolor(clRed);
DrawRectangle(20,20,80,200);
setpencolor(clYellow);
DrawRectangle(200,97,500,156);
setpencolor(clGreen);
DrawRectangle(300,120,400,420);
end.
- 19.01.2017 07:49
- thumb_up 29
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.