OPENIN
OPENIN
10 REM Ouvre et Reçoit l e f i c h i e r en provenance de l a
d i squet te
20 OPENIN "NOMFICH":INPUT # 9 , a , a $
30 CLOSE IN:PR INT"1 es 2 v al eur s sont:"
40 PRINT:PRINT a,a»
r un
OPENOUT
OPENOUT
10 REM Ouvre et Sort 1 e f i c h i e r sur l a d i s q u e t t e
20 INPUT "Do nnez moi un nombre"; a
30 INPUT "Donnez moi un mot" j a$
40 OPENOUT "NOMFICH"
50 WRITE #9, a, at
60 CLOSEOUT: PR I NT"1e«i donnees sont sauvées sur d i s q u e t t e
run
Chapitre 3
Page 53
RETURN, SOUND, SQ
CLOSEIN, EOF
CLOSEOUT