"Script Nou" - Processing

ID	Autor	Duplicat din	Ultima modificare
`#4987`	Nicolescu Razvan (razvan_nic)	-	Vineri, 20 mai 2022, 10:57

let a=[3,9,8,1,4,54,32,12,40,2,1,3,4,5,10,16,9,23,0,1]

function setup() {
	createCanvas(400, 400);
  	frameRate(10);
} 

function quicksort(l,r){
  	if(l>=r)
    {return;}
  	else
    {
      	let i,j=l;
      	for(i=l+1;i<r;i++)
        {
          	if(a[i]<a[l])
            {
              	j++;
              	let x=a[i];
              	a[i]=a[j];
              	a[j]=x;
            }
          	background("gray");
          	for(let k=0;k<20;k++)
            {
              	if(k==l)
                {
                  	fill("green");
                }
              	if(k==j)
                {
                  	fill("red");
                }
              	else
                {
                  	fill("white");
                }
              	rect(20*k,380,20,-5*a[k]);
            }
        }
      	quicksort(l,j-1);
      	quicksort(j+1,r);
    }
}

function draw() {
	quicksort(0,19);
}