home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / a / armbob / bench / BobFile1 < prev    next >
Text File  |  1994-07-14  |  155b  |  15 lines
  1. /* Test 1 */
  2. main()
  3. {
  4.  n = 100;
  5.  t = time();
  6.  for (i=0;i<n;i++)
  7.     print(f(i,i*i),"\n");
  8.  print(time()-t," 1/100-secs\n");
  9. }
  10.  
  11. f(x,y)
  12. {
  13.  return x%2?x:y;
  14. }
  15.