Étape 7: Utilisation de base au lieu de bash.
FreeBASIC est gratuit et est disponible pour la plupart des plates-formes.
compilez avec
FBC-lang qb filerdr.bas
filerdr.bas
[code]
Ouvrez le « fichier » pour l’entrée comme #1
ouvrir « notes » pour la sortie # 2
ouvrir « notes-cs » pour la sortie # 3
faites tout en eof(1) pas
entrée #1, un$
b$ = left$(a$,2)
c$ = mid$(a$,4,2)
imprimer #2, « NOTE_ »; b$; «, » ;
imprimer #3, c$; «, » ;
boucle
fermer #1
proche #2
fermer #3
[/ code]
fichier
G3-3
F4-23
Notes
NOTE_G3, NOTE_F4,
Notes-cs
3, 23,