Publicité
ne près.
1380 LOCATE 6 ,1 2 : PRINT "Classement en"
1390
QSUB 2750 ' espace
6
1400 RETURN ' au menu p r i n c i p a l
1410 '
1420 ' SOUS-PROGRAMME: Permutation
1430 '
1440 s l * = f i e l d l * ( s 3 7 . ) : t i el d 1* (s37. ) M i e l d l * ( s 4 % ) : f i el d 1* (s47. )
= s i *
= s i *
1460 s l * = f i e l d3 * ( s 37 . ) : f i e l d 3 * ( s 3 7 . ) = ' f i e l d 3 * ( s 4 7 . ) : f i e l d3 * ( s 47 . )
= s i *
1470 s l * = f i e l d 4 * ( s 3 X ) : T i el d4* (s37) =f i el d4* <s47.) : t i e l d 4 * (s47.)
1480 s l * = f i e l d 5 * ( s 3 X ) :
= s i *
i
Annexe 3 P age 16
i
i el d5* (s37.) = f i el d5* (s4X) : f i el d5* (s47.)
Et pour q u elq u es program m es d e plus...
timenow;"secondes"
5
1
1
1
Publicité
