/* PYRAMIDA - pro magazin FLOP */¢¢main()¢$(¢int a[100],i,j,m,n,k,l,o,p,q,r;¢printf("\n P Y R A M I D A\n");¢printf("\n algoritmus - J.Walla");¢printf("\n \"C\" verze - Z.Burian");¢printf("\n START - stopni cas\n\n");¢¢r=0;¢a[29]=4;a[59]=0;a[89]=3;¢ for(i=0;i<=2;i++)¢ $(j=2-i;¢ for(m=0;m<=4;m++)¢ $(n=4-m;¢ for(k=0;k<=3;k++)¢ for(l=0;l<=3;l++)¢ $(a[19]=i;a[39]=j;a[49]=k;¢ a[69]=l;a[79]=m;a[99]=n;¢ for(o=8;o>=1;o--)¢ for(p=1;p<=o;p++)¢a[p*10+o]=a[p*10+o+1]+a[(p+1)*10+o+1];¢¢if(a[25]==20&&a[45]==20&&a[23]==70&&a[11]==311)¢ $(for(q=1;q<=9;q++)¢ printf("%d ",a[q*10+9]);¢ printf("\n\n");¢ r++;$)¢ $)¢ $)¢ $)¢printf("\nhotovo !!!!!!");¢printf("\n nalezeno celkem %d reseni\n",r);¢printf("\nodklepni pro navrat do systemu");¢o=getchar();¢$)¢