...
...
! saisie au format libre ... print *,'1 ère planète : '; read *, m2 print *,'2 ère planète : '; read *, m1 ! mise en route ... c21 = 360/((m2-m1)*365.25) i = 1 print *,' ' print *,'Résultats:' 69 x = c21 * i- int(c21*i+0.5) print *,c21*i,' année(s) julienne(s)' i = i + 1 if (i < 11) goto 69 print *,' ' print *,'Au revoir ... ' end program
Bon, j'insiste pas ... A+