home *** CD-ROM | disk | FTP | other *** search
/ Microsoft Programmer's Library 1.3 / Microsoft-Programers-Library-v1.3.iso / sampcode / qc / qc25 / oldstyle.c < prev    next >
Encoding:
C/C++ Source or Header  |  1989-11-15  |  379 b   |  24 lines
  1. /* OLDSTYLE.C: Old-style function. */
  2. #include <stdio.h>
  3. #define PI 3.14
  4.  
  5. float sphere();
  6.  
  7. main()
  8. {
  9.    float volume;
  10.    int radius = 3;
  11.    volume = sphere( radius );
  12.    printf( "Volume: %f\n", volume );
  13. }
  14.  
  15. float sphere( rad )
  16. int rad;
  17. {
  18.    float result;
  19.    result = rad * rad * rad;
  20.    result = 4 * PI * result;
  21.    result = result / 3;
  22.    return result;
  23. }
  24.