Pascal J'ai besoin de modifier le programme comme le résultat à écrire dans le fichier texte maxim.out

Question

J'ai un programme qui compte le plus grand nombre de 3 nombres. J'ai besoin de modifier le programme comme le résultat à écrire dans le fichier texte maxim.out (PASCAL)

Answer 1

Vous devriez lire à propos de "gestion de fichiers en pascal". Quoi qu'il en soit, déclarer une variable de type textfile:

var 
    outputfile : TextFile; 

puis AssignFile() pour le nom de choix (maxim.out), réécrire() le fichier, utilisez writeln() pour écrire en elle, et enfin CloseFile() il.

Vous pouvez trouver un exemple de programme complet ici: http://wiki.freepascal.org/File_Handling_In_Pascal

Answer 2

Vous pouvez écrire la valeur (en supposant qu'il est un entier et il a le nom, par exemple, yourValue) avec:

var 
    maximFile: Text; 

... 

    Assign(maximFile, 'maxim.out'); // link the name to the Text variable 
    Rewrite(maximFile);    // open it for writing 
    Writeln(maximFile, yourValue); // write the value as a line of its own 
    Close(maximFile);    // close the file 

Vous pouvez puis en lire la valeur plus tard avec:

Assign(maximFile, 'maxim.out'); 
    Reset(maximFile); 
    Readln(maximFile, yourValue); 
    Close(maximFile); 

Je n'a pas ajouté de traitement des erreurs (par exemple si le fichier ne peut être trouvé, ou si elle est en lecture seule, ou e Mpty, ou ...). Selon les paramètres, cela est fait avec des exceptions ou avec des valeurs IOResult. Lisez la documentation sur la façon de le faire. Il devrait y avoir des exemples dans les docs.