>>32
   PROGRAM chinpopo
   DO 10 i = 0, 6
    x = 10.0**REAL(i)
y = LOG10(x)
z = LOG(x)
WRITE(6, *) INT(x), y, z
10 CONTINUE
   END
>>35