Разработать программу с использование графического режима на паскале abc . реализовать программу, которая периодически выводит на экран «звездное небо» и затем гасит его.

GordienkoA20 GordienkoA20    1   09.06.2019 06:40    0

Ответы
армен459 армен459  01.10.2020 22:50
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);
  System.Threading.Thread.Sleep(500);
  GraphABC.FillRect(0, 0, WindowWidth, WindowHeight);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика