Cod sursa(job #2774524)

Utilizator BlaugranasEnal Gemaledin Blaugranas Data 11 septembrie 2021 20:06:24
Problema Submultimi Scor 100
Compilator c-64 Status done
Runda Arhiva educationala Marime 0.64 kb
#include<stdio.h>
int n,p,k,i,j,s[17];
int main()
{
	freopen("submultimi.in","r",stdin),freopen("submultimi.out","w",stdout),scanf("%d",&n);
	for(p=1;p<=n;++p)
        for(k=1,s[k]=0;k;) {
            for(++s[k],j=i=1;i<k&&j;++i)
                if(s[i]==s[k])
                    j=0;
            if(j)
                if(s[k]<=n)
                    if(k==p) {
                        for(i=1;i<=k;++i)
                            printf("%d ",s[i]);
                        printf("\n");
                    } else
                        ++k,s[k]=s[k-1];
                else
                    --k;
        }
    return 0;
}