Pascal este unul dintre cele mai comune limbi de programare datorită simplității și funcționalității sale. Prin Pascal, puteți lucra cu fișiere prin crearea sau modificarea lor cu funcțiile corespunzătoare.
instrucție
Pentru a crea un fișier text în Pascal, trebuie să specificați variabilele de tipul corespunzător care vor fi scrise în secțiunea de memorie corespunzătoare. Pentru a face acest lucru, puteți utiliza diferite funcții ale limbii.
Toate datele și variabilele sunt scrise utilizând operația standard Writeln (specificați doar un parametru suplimentar). Program CreateFile;
var text fișier: Text; numetip: String; textstring: String; a, b: integer; unde textfile este o variabilă de tip Text, care conține numele fișierului. Nametype este tipul de introducere a textului la care String este atribuit. Textstring este un șir de text de tip adecvat. A și b sunt variabile auxiliare care stochează valori numerice întregi.
Invitați utilizatorul să introducă tipul fișierului de tip de nume dorit. Acesta trebuie să fie asociat cu fișierul textfile.Writeln ("Vă rugăm să introduceți numele introducerii datelor");
Alocați (text, nume);
Deschideți fișierul pentru a scrie date și solicitați utilizatorului să introducă mai întâi numărul de rânduri pentru înregistrare, apoi conținutul acestora. Datele vor fi introduse alternativ în documentul propriu-zis. Rewrite (textfile);
Writeln ("Numere de tip de șiruri de caractere:");
Writeln ("Vă rugăm să introduceți șirurile:");
Pentru a înregistra un număr fix de linii, utilizați o buclă al cărei prim parametru trebuie să se potrivească cu primul rând al fișierului, în acest caz cifra 1. pentru a: = 1 până la b
se încheie;
Închideți lucrul cu fișierul și închideți programul utilizând funcțiile corespunzătoare. De asemenea, trimiteți o notificare de înregistrare reușită. Pentru a evita problemele cu ieșirea, emiteți un al doilea readln.close (textfile);
Sfârșit.
Fișierul a fost creat cu succes. Compilați și salvați scriptul prin meniul din mediul de programare.
Articole similare
Trimiteți-le prietenilor: