Originariamente inviato da cso
codice:
ciao a tutti!                   ;
come state?                     ;
oggi è una bellissima giornata! ;
nn credo tu riesca a mettere i ; allineati .. nn ricordo molto di pascal .. cmq
codice:
f1=apri il file 
f2=crea altro file
finche nn sei alla fine
 r=f1.leggi riga
 r:=r+';'
 f2.appendi(r)
fine while
chiudi f1 e f2
copia f2 su f1