home *** CD-ROM | disk | FTP | other *** search
/ Amiga MA Magazine 1997 #3 / amigamamagazinepolishissue03-1 / ma_1995 / 08 / ami011c.txt < prev    next >
Text File  |  1997-04-07  |  828b  |  79 lines
  1. <l>
  2.  
  3. /*********************************************/
  4.  
  5. /* Program liczy liczbë caîkë oznaczonâ z x^2*/
  6.  
  7. /*      Napisane dla Magazynu Amiga          */
  8.  
  9. /*              1995 by BsZ                  */
  10.  
  11. /*********************************************/
  12.  
  13.  
  14.  
  15. #include <stdio.h>
  16.  
  17. #include <stdlib.h>
  18.  
  19. #include <time.h>
  20.  
  21.  
  22.  
  23. float f(float x)
  24.  
  25. {
  26.  
  27.     return (float)(x*x);
  28.  
  29. }
  30.  
  31.  
  32.  
  33. main(int argc, char *argv[])
  34.  
  35. {
  36.  
  37.     long int loop;
  38.  
  39.     float N,a,b,caîka=0;
  40.  
  41.     long int t0,t;
  42.  
  43.  
  44.  
  45.     if(argc!=4)
  46.  
  47.     {
  48.  
  49.         printf("Nie podaîeô argumentów!\n");
  50.  
  51.         exit(0);
  52.  
  53.     }
  54.  
  55.     N=(float)atol(argv[1]);
  56.  
  57.     a=atof(argv[2]);
  58.  
  59.     b=atof(argv[3]);
  60.  
  61.  
  62.  
  63.     time(&t0);
  64.  
  65.  
  66.  
  67.     for(loop=1;loop<=N;loop++)
  68.  
  69.         caîka+=f( (float)(a+(loop-1)*(b-a)/N) ) + f( (float)(a+loop*(b-a)/N) );
  70.  
  71.     caîka*=(b-a)/(2.0*N);
  72.  
  73.     time(&t);
  74.  
  75.     printf("Wyliczona wartoôê caîki: %f\nCzas obliczeï: %lds\n",caîka,t-t0);
  76.  
  77. }
  78.  
  79.