[pitonms]

Привет булка, небыло меня около полутора лет на форуме =D.
Вот зашел к вам за помощью, очень нужно на паскале написать программу.
Сам немогу ибо щас практика, исправление долгов, дискретная математика (ненавижу ее).
Суть проста: снеговик, махает руками, и рандомный снег.
Вот код снега:

procedure DrawSnow;
var x,y,count:integer;
begin
      randomize;
      for count := 0 to 250 do begin
             x := random(0,640);
             y := random(0,480);
             ellipse(x,y,0,360,1,1);
     end;
end;

сам не могу написать, ибо нет времени. Проблемы с девушкой и учебой, ну и работаю.

P.S. модератор меня долго не было, если что просто перенеси топ в другой раздел.