Cod sursa(job #2768922)

Utilizator BlaugranasEnal Gemaledin Blaugranas Data 12 august 2021 16:43:02
Problema Statistici de ordine Scor 70
Compilator c-64 Status done
Runda Arhiva educationala Marime 0.58 kb
#include<stdio.h>
#include<time.h>
int a[3000001],n,k,i;
int P(int a[],int b,int c)
{
	int i=b-1,j=c+1,p=a[b+(rand()%(c-b+1))],l;
	while(1) {
		for(++i;a[i]<p;++i);
		for(--j;a[j]>p;--j);
		if(i<j)
			l=a[i],a[i]=a[j],a[j]=l;
		else
			return j;
	}
	return 0;
}
void S(int a[],int i,int j,int k)
{
	if(i==j)
		return;
	int q=P(a,i,j),t=q-i+1;
	t>=k?S(a,i,q,k):S(a,q+1,j,k-t);
}
int main()
{
    freopen("sdo.in","r",stdin),freopen("sdo.out","w",stdout);
	for(srand(time(NULL)),scanf("%d%d",&n,&k),i=1;i<=n;i++)
		scanf("%d",a+i);
	S(a,1,n,k),printf("%d",a[k]);
}