Το Pascal είναι μια από τις πιο διαδεδομένες γλώσσες προγραμματισμού λόγω της απλότητας και της εξαιρετικής λειτουργικότητάς του. Μέσω του Pascal, μπορείτε να εργαστείτε με αρχεία δημιουργώντας ή τροποποιώντας τα χρησιμοποιώντας τις κατάλληλες λειτουργίες.
Οδηγίες
Βήμα 1
Για να δημιουργήσετε ένα αρχείο κειμένου στο Pascal, είναι απαραίτητο να ορίσετε μεταβλητές του κατάλληλου τύπου, οι οποίες θα γραφτούν στην αντίστοιχη ενότητα μνήμης. Για να το κάνετε αυτό, μπορείτε να χρησιμοποιήσετε τις διάφορες λειτουργίες της γλώσσας. Όλα τα δεδομένα και οι μεταβλητές γράφονται χρησιμοποιώντας την τυπική λειτουργία Writeln (απλώς καθορίστε μια πρόσθετη παράμετρο).
var textfile: Κείμενο; τύπος ονόματος: String; συμβολοσειρά: String; a, b: integer; Όπου το textfile είναι μια μεταβλητή τύπου κειμένου που περιέχει το όνομα του αρχείου. Nametype - ο τύπος εισαγωγής κειμένου στον οποίο έχει αντιστοιχιστεί η συμβολοσειρά. Το Textstring είναι μια συμβολοσειρά κειμένου του κατάλληλου τύπου. Τα A και b είναι βοηθητικές μεταβλητές που αποθηκεύουν ακέραιες αριθμητικές τιμές.
Βήμα 2
Ζητήστε από τον χρήστη να εισαγάγει τον επιθυμητό τύπο αρχείου. Πρέπει να συνδεθεί με το textfile. Writeln το ίδιο ("Παρακαλώ, πληκτρολογήστε το όνομα της πληκτρολόγησης δεδομένων");
Readln (τύπος ονόματος);
Εκχώρηση (textfile, τύπος ονόματος);
Βήμα 3
Ανοίξτε το αρχείο για να γράψετε δεδομένα και ζητήστε από το χρήστη να εισαγάγει πρώτα τον αριθμό των γραμμών που θα γράψει και μετά το περιεχόμενό του. Τα δεδομένα θα εισαχθούν στο ίδιο το έγγραφο ένα προς ένα. Ξαναγράψτε (textfile);
Writeln («Αριθμός αριθμών συμβολοσειρών:»);
Readln (β); {μεταβλητή που αποθηκεύει τον αριθμό των γραμμών}
Writeln ('Παρακαλώ, πληκτρολογήστε τις χορδές:');
Βήμα 4
Για να γράψετε έναν σταθερό αριθμό γραμμών, χρησιμοποιήστε έναν βρόχο, η πρώτη παράμετρος της οποίας πρέπει να αντιστοιχεί στον αριθμό της πρώτης γραμμής του αρχείου, στην περίπτωση αυτή ο αριθμός 1. για a: = 1 έως b do
αρχίζουν
Readln (textstring);
Writeln (textfile, textstring); {λειτουργία εγγραφής αρχείων}
τέλος;
Βήμα 5
Βγείτε από το αρχείο και τερματίστε το πρόγραμμα χρησιμοποιώντας τις κατάλληλες λειτουργίες. Εμφανίστε επίσης μια ειδοποίηση για την επιτυχή εγγραφή. Για να αποφύγετε προβλήματα με την έξοδο, ορίστε ένα δεύτερο readln.close (textfile).
Writeln («Επιτυχία»);
readln;
Τέλος.
Βήμα 6
Το αρχείο δημιουργήθηκε με επιτυχία. Μεταγλώττιση και αποθήκευση του σεναρίου μέσω του μενού του περιβάλλοντος προγραμματισμού.
