10 a = tim
20 for x = 1 to 1000000
30 next
40 ? tim - a
