home *** CD-ROM | disk | FTP | other *** search
/ ftp.cse.unsw.edu.au / 2014.06.ftp.cse.unsw.edu.au.tar / ftp.cse.unsw.edu.au / pub / doc / languages / C / ioccc / 1990 / theorem.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-10-18  |  1.5 KB  |  94 lines
  1. #include <stdio.h>
  2. #include <math.h>
  3. #define X
  4. #define Y {}
  5. #define C  }
  6. #define o {
  7. #undef main
  8. char m[500][99],v[99],R;
  9. int*a,b,n,i,j,W,A;
  10. float Q,G,D,M,T,B,O,U,V,N,y,e();
  11. P(g,R,u)float*g,R,u;{int c;for(*g=1,c=u;c--;*g*=R);}
  12. X
  13. K(g,R,u)float*g,u;char R;
  14. o
  15. if(R=='+')*g+=u;
  16. if(R=='-')*g-=u;
  17. if(R=='*')*g*=u;
  18. if(R=='/')*g/=u;
  19. if(R=='^')P(g,*g,u);
  20. C
  21. w(g,R,u)float*g,u;char R;
  22. /**/{int b,f;A=atoi(*++a);b=atoi(*++a);while((f=A+b)<15000){printf("%d\n",f);A=b;b=f;}}
  23. main(A,a)int A;char*a[];
  24. o o
  25. if(!strcmp(*++a,"-r"))S();
  26. D=atof(*++a);
  27. T=atof(*++a);
  28. B=atof(*++a);
  29. M=atof(*(4+(a-=3)));
  30. C
  31. while(D<T)
  32. o
  33. U=e((G=B/2,*a),D,M,a);
  34. V=e(*a,Q=D+G,M+G*U,a);
  35. /*/
  36. z;/*/
  37. N=2*e(*a,Q,M+G*V,a);
  38. M+=B*V/3+B*N/6+B*e(*a,D+=B,M+G*N,a)/6+G*U/3;
  39. printf("%f %f\n",D,M);
  40. C
  41. while(T=0)
  42. ;
  43. W=D=1;
  44. ;
  45. while(W!=1)
  46. o o
  47. strcpy(j+m,v);
  48. o 
  49. if((j-=W)<=W)break;
  50. strcpy(j+m,m+j-W);
  51. C
  52. while(strcmp(m+j-W,v)>0)
  53. j=i;
  54. strcpy(v,i+m);
  55. C
  56. for(i=(W/=3)-1;++i<n;)
  57. ;
  58. C
  59. do
  60. ;
  61. while(0);
  62. for(W=1;(W=W*3+1)<n;);
  63. C
  64. float e(f,D,M,a)char*f,*a[];float D,M;
  65. o
  66. #define main L
  67. O=0;
  68. R='+';
  69. for(;*f;f++)
  70. if(*f=='y')K(&O,R,M);
  71. else if((*f>='0')&&(*f<='9'))K(&O,R,(float)*f-'0');
  72. else if(*f=='x')K(&O,R,D);
  73. else if(1)R=*f;
  74. if(1);
  75. return O;
  76. for(j=0;j<n;puts(j++[m]));
  77. e("",O,&O,a);
  78. n=j-(O=1);
  79. while(gets(j++[m]));
  80. if(!strcmp(*++a,"-r"))S();
  81. C
  82. /**/main(A,a)int A;char*a[];
  83. Y
  84. S(){while(gets(b++[m]));for(b--;b--;puts(b[m]));}
  85. char*f,m[500][99],R,v[99];
  86. int b,W,n,i,j,z;
  87. float Q,G,D,M,T,O,B,U,V,N,e();
  88. #define Y
  89. #define X {}
  90. #define o }
  91. #define C {
  92. #include <stdio.h>
  93. #include <math.h>
  94.