Алгебра
Английский
Биология
География
Геометрия
История
Русский
Обществознание
Физика
Химия
Информатика
Литература
МатематикаВопрос:
Задание 1. Написать программу, рисующую изображение дома.
Ответ:
Краткое пояснение: Программа использует библиотеку GraphABC для отрисовки графических элементов, таких как окна, линии и фигуры, для создания изображения дома.
Решение:
Program Домик;
uses GraphAbc;
begin
SetWindowWidth(800);
SetWindowHeight(600);
SetPenWidth(3);
SetFontSize(18);
SetFontColor(clRed);
SetFontStyle(fsBold);
TextOut(100,100, 'Домик');
Rectangle(200, 300, 600,600);
Circle(400,225, 40);
rectangle(300,400,500,500);
SetBrushColor(clSkyBlue);
FillRect(300, 400,500,500);
Line(400,400,400,500);
Line(300,450,500,450);
Line(200,300,400,150);
Line(400,150,600,300);
Line(480,210,480,160);
Line(480,160,520,160);
Line(520,160,520,240);
end.
Похожие
