Bisogna innanzitutto determinare il tipo di file che si intende creare. Se tu intendi creare un semplice file di testo che contiene il valore di una variabile di testo (una stringa) devi operare così:
codice:
Program P;
Var f : Text;
testo: String;
Begin
Assign(f, "nomefile.txt"); (* Assegna un file ad un descrittore *)
Rewrite(f); (* crea e apre il file *)
Writeln(f, testo); (* scrive il valore di 'testo' nel file *)
Close(f); (* chiude il file *)
End.
Attenzione: se il file esiste già, sarà cancellato e quindi ricreato.
Per poter aprire un file già esistente in scrittura senza che questo venga prima cancellato devi utilizzare la procedura Append, al posto di Rewrite.
Per aprire un file in lettura si utilizza Reset.
Ciao.