• Очень срочно! Пожалуйста!!! Составьте программу рисования фигуры, изображенной на рисунке! Буду очень благодарна!!!

    question img

Ответы 3

  • а можно на русском?
    • Автор:

      porter30
    • 6 лет назад
    • 0
  • Всмысле на русском? Что вам надо на русском?)))
  • //PascalABC.NET 3.1 сборка 1239uses GraphABC;const    n = 4;begin    Window.CenterOnScreen;    var h := 100;    Window.SetSize(h * n, h * n);    Pen.Width := 3;        for var i := 1 to n - 1 do     begin        Pen.Color := clRandom;        Polyline((h * i, h * 0), (h * n, h * (n - i)), (h * (n - i), h * n), (h * 0, h * i), (h * i, h * 0));    end;end.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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