Valtozo teglalap
public text v1 · immutableprogram negyzet;
uses grafika;
begin
Randomize;
Setcolor(Random(16)); FilledRectangle(100,50,100+Random(400),50+random(200));
end.program negyzet;
uses grafika;
begin
Randomize;
Setcolor(Random(16)); FilledRectangle(100,50,100+Random(400),50+random(200));
end.