Составить программу, выводящую изображение: на синем фоне экрана 250 точек желтого цвета с произвольными координатами. pascal abc

program randomDots;

uses graphabc;

const

windowWidth = 640;

windowHeight = 480;

var

i:integer;

begin

setwindowsize(windowWidth, windowHeight);

clearwindow(clblue);

for i:=1 to 250 do

setpixel(round(random() * windowWidth), round(random() * windowHeight), clyellow);

end.