change test to test an int read and a float read

Codes_en_COREC/tests/test9.corec

-// Conditions (if else ternaire..)
+// Saisie
 
-prog test4 {
+prog test9 {
         def Main {
-        Rec : {
-            printstr("Saisie clavie :");
-            read(saisie);
-            print(saisie)
-        }
+            Loc: (f,1), saisie
+            Rec : {
+                printstr("Saisie clavier :");
+                read(saisie);
+                print(saisie);
+                printstr("Saisie float clavier:");
+                read(f);
+                print(f)
+            }
     }
 }