• нарисуйте дерево на солнечной поляне, пользуясь прямоугольниками и окружностями при необходимости заливкой в паскале

    question img

Ответы 1

  • //Обычный вариантuses GraphABC;begin  Rectangle(0,350,Window.Width,Window.Height);  Circle(0, 0, 100);  Rectangle(390,400,415,250);  Circle(400, 170, 100);  Circle(350, 170, 15);  Circle(420, 130, 10);  Circle(420, 230, 10);end.//===================================//Вариант с заливкойuses GraphABC;begin  Rectangle(0,350,Window.Width,Window.Height);  FloodFill(1,351, clGreen);  Circle(0, 0, 100);  FloodFill(1,1, clYellow);  Rectangle(390,400,415,250);  FloodFill(395,255, clBrown);   Circle(400, 170, 100);  FloodFill(401,171, clLime);  Circle(350, 170, 15);  FloodFill(350,170, clRed);  Circle(420, 130, 10);  FloodFill(421,131, clRed);  Circle(420, 230, 10);  FloodFill(421,231, clRed);end.
    answer img
    answer img
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years