Сделай код кумир через чертежник нарисовать кораблик

Чтобы нарисовать кораблик в среде разработки «Код Кумир» с помощью библиотеки «Чертежник», необходимо использовать некоторые базовые команды для рисования. Я объясню, как это можно сделать шаг за шагом. ### Шаг 1: Подготовка кода Первым делом нужно подготовить область, в которой будет рисоваться наш кораблик. Для этого установим размеры окна. ```pascal begin // Устанавливаем размеры окна SetWindowSize(800, 600); ClearWindow; // Очищаем окно ``` ### Шаг 2: Рисуем корпус корабля Теперь можем нарисовать корпус нашего корабля. Мы воспользуемся командой `Rectangle` для формирования основного корпуса. ```pascal // Рисуем корпус корабля SetColor(150, 75, 0); // Коричневый цвет для корпуса Rectangle(300, 400, 500, 450); // Корпус (x1, y1, x2, y2) ``` ### Шаг 3: Рисуем верхнюю часть корабля Теперь добавим верхнюю часть (капитана): ```pascal // Рисуем верхнюю часть корабля SetColor(255, 215, 0); // Золотистый цвет Rectangle(350, 350, 450, 400); // Верхняя часть ``` ### Шаг 4: Рисуем мачту корабля Добавим мачту с флагом: ```pascal // Рисуем мачту SetColor(139, 69, 19); // Темно-коричневый цвет Rectangle(400, 250, 410, 350); // Мачта // Рисуем флаг SetColor(255, 0, 0); // Красный цвет для флага Polygon([410, 250], [460, 270], [410, 290]); // Флаг ``` ### Шаг 5: Рисуем волны Чтобы добавить немного эффекта, рисуем волны под кораблем: ```pascal SetColor(0, 0, 255); // Синий цвет для волн Ellipse(350, 450, 220, 10); // Первая волна Ellipse(400, 460, 220, 10); // Вторая волна Ellipse(450, 450, 220, 10); // Третья волна ``` ### Шаг 6: Завершаем программу В конце необходимо завершить программу фразой `end.`: ```pascal // Завершение программы ReadLn; // Ожидаем нажатия клавиши end. ``` ### Полный код Теперь соберем всё воедино: ```pascal begin SetWindowSize(800, 600); ClearWindow; // Корпус корабля SetColor(150, 75, 0); Rectangle(300, 400, 500, 450); // Верхняя часть SetColor(255, 215, 0); Rectangle(350, 350, 450, 400); // Мачта SetColor(139, 69, 19); Rectangle(400, 250, 410, 350); // Флаг SetColor(255, 0, 0); Polygon([410, 250], [460, 270], [410, 290]); // Волны SetColor(0, 0, 255); Ellipse(350, 450, 220, 10); Ellipse(400, 460, 220, 10); Ellipse(450, 450, 220, 10); ReadLn; end. ``` ### Итог Теперь, запустив этот код в «Код Кумир», вы увидите нарисованный кораблик на экране. Это поможет вам освоить базовые команды для рисования вчетверях в данной среде.