home *** CD-ROM | disk | FTP | other *** search
/ io Programmo 40 / IOPROG_40.ISO / SOFT / NETFrameworkSDK.exe / comsdk.cab / samples1.exe / MyC / Tests / tflow.myc < prev   
Encoding:
Text File  |  2000-06-23  |  366 b   |  39 lines
  1. static int a;
  2.  
  3. int foo(int a)
  4.   {
  5.   int b;
  6.   b = a;
  7.   return b;
  8.   }
  9.  
  10. main()
  11.   {
  12.   int i;
  13.   int j;
  14.  
  15.   j = 0;
  16.   for (i = 0; i < 10; i = i + 1)
  17.     {
  18.     j = j + i;
  19.     }
  20.  
  21.   i = 0;
  22.   while (i < 10)
  23.     {
  24.     i = i + 1;
  25.     }
  26.  
  27.   i = 0;
  28.   j = 1;
  29.   while (1)
  30.     {
  31.     if (i > j)
  32.       break;
  33.     i = i + 1;
  34.     }
  35.  
  36.   j = foo(i);
  37.   }
  38.  
  39.