• реализовать программу на паскаль abc «звездное небо» и затем гасит его

Ответы 1

  • Красота :зuses  GraphABC;var  i: integer;begin  GraphABC.Brush.Color := Color.DarkBlue;  GraphABC.FillRect(0, 0, WindowWidth, WindowHeight);  for i := 1 to 1000 do    GraphABC.SetPixel(Random(WindowWidth), Random(WindowHeight), clWhite);end.
  • Добавить свой ответ

Войти через Google

или

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

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

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