[Turbo Pascal] Referat o przetwarzaniu plików tekstowych

wiec mam napisać referat na informatyke który bedzie dotyczył tego


Opisz przetwarzanie plików tekstowych w Turbo Pascalu.

1. Etapy przetwarzania pliku tekstowego
2. Funkcje i procedury przetwarzania plików tekstowych.
W referacie i w programach powinny znaleźć sie zapisy: Text, Assign, Reset, Rewrite, Readln, Writeln, Close, Eof
3. Przykładowy program z komentrzem co dana linia wykonuje.

Zad 1 Na dysku C w katalogu DANE znajduje sie plik tekstowy o nazwie zad1.txt zawierający jedną liczbę całkowitą. Napisz program, który odczyta liczbę z pliku i napisze czy jest ona dodatnia.

Zad 2 Na dysku C w katalogu DANE znajduje sie plik tekstowy o nazwie zad2.txt zawierający 10 liczb całkowitych (po jednej w każdym wierszu). Napisz program, który wczyta liczby z pliku i znajdzie ich sumę.

Zad 3. Na dysku C w katalogu DANE znajduje sie plik tekstowy o nazwie zad3.txt zawierający 20 linijek tekstu. Napisz program, który wczyta linie tekstu z pliku i sprawdzi ile jest liter 'a' lub 'A'w pliku.



prosze o jakieś linki albo konkretne odpowiedzi

Mam nadzieje że ktoś mi pomoże bo dla mnie to zupełna magia a pan google też niwiele wie

prosze o szybką odpowiedz bo musze zrobić to na jutro

1. Etapy przetwarzania pliku tekstowego

1 - Skojarzenie pliku dyskowego z zmienną (Utworzenie uchwytu do pliku) - Polecenie ASSIGN(Zmienna_Plikowa,'Patch do pliku');
2 Otwarcie pliku
A - Do zapisu REWRITE(Zmienna_plikowa); - Jeśli plik istniał zostanie skasowany i w to miejsce utworzony nowy.
B - Do odczytu RESET(zmienna_plikowa); - Wskaźnik w pliku zostanie ustawiony na początku pliku czyli równa się zero.
3 A - Czytanie do pliku READ(zmienna_plikowa,zmienna); zmienna jest typem elementu pliku (string, byte, rekord, ...);
B - Pisanie do pliku WRITE(zmienna_plikowa,zmienna);
4 Zamknięcie pliku (zwolnienie uchwytu).
Do plików praktycznie można zapisywać wszystkie typy danych prócz obiektów.

2. Funkcje i procedury przetwarzania plików tekstowych.

Deklaracje plików:
var plik:FILE OF typ_danej; gdzie typ danej jak wspomniałem wcześniej może być typu prostego lub jakąś strukturą np:Rekord.
np: plik:file of byte;, plik:file of real;
var plik:file; Deklaracja pliku o niewiadomych elementach
Var plik:Text; - deklaracja pliku tekstowego; gdzie elementami są elementy typu string lub char;

Funkcje i Procedury:
assign - skojarzenie pliku z zmienną utworzenie uchwytu.
rewrite - otwarcie pliku do pisania.
read - czytanie pliku.
write - pisanie do pliku.
close - zamknięcie pliku.
seek - Przesunięcie wskaźnika w pliku.
blockread - czytanie bloku danych z pliku.
blockwrite - Pisanie do pliku bloku danych.
eof -gdy wskażnik pliku osiągnie koniec to przyjmuje wartość true.

Wszystkie polecenia masz dokładnie opisane w helpie Pascala.

3. Przykładowy program z komentarzem co dana linia wykonuje.

{uwaga program nie rozpoznaje czy podany ciąg jest liczba czy ciągiem jakichś znaków}var  plik:text;      {Deklaracja pliku testowego}  s:string;       {zmienna s typu string}  Procedure pisz_plik;    {Procedura Zapisująca do pliku jeden element}    begin      assign(plik,'c:\plik.txt');  {Skojarzenie zmiennej plik z fizycznym plikiem}      rewrite(plik);    {Otwarcie pliku do zapisu jeśli istniał wcześniej zostanie nadpisany}      write(plik,s);   {pisz do pliku zmienna S}      close(plik);     {zamknij plik}    end;  procedure czytaj_plik;{Procedura Czytająca z pliku jeden element}    begin      assign(plik,'c:\plik.txt');{Skojarzenie zmiennej plik z fizycznym plikiem}      reset(plik);  {Otwarcie pliku do odczytu - ustawienie wskaźnika na początku pliku}      read(plik,s);{Czytaj plik i zapisz do S}      close(plik); {zamknij plik}    end;  begin                     {Początek programu głównego}    writeln('Podaj Liczb© całkowitą i naciśnij ENTER');    readln(s); {Zapisanie do s ciągu znaków i czekanie na ENTER}    writeln('Zapisuj© do pliku');    pisz_plik;             {Wywołanie procedury zapisu do pliku)    writeln('Czytam Plik');    s:='';                   {zerowanie zmiennej s zostaje przypisany do s znak #0}    czytaj_plik;          {wywołanie procedury czytającej plik}    writeln('Zapisana cyfra w pliku to: ',s);  readln;                {Enter i zakończenie programu}  end.

Zerknij na poniższe linki coś w nich znajdziesz dla siebie:
http://peb.pl/programowanie/122544-pascal-...-wierszy-i.html
http://turbopascal.skryptoteka.pl/13.html
http://4programmers.net/Turbo_Pascal/Pliki
http://pascal.netax.pl/pliki-pobierz-algor...tekstowego.html
http://marek.piasecki.staff.iiar.pwr.wroc....ki_tekstowe.pdf
Nie rozumiem twoich problemów z GOOGLE może po prostu liczysz na gotowce.
Samo przetwarzanie plików to temat RZEKA. Konstrukcja pętli (While Do, repeat ... until not eof),Pisanie, czytanie danych różnych typów, no i przetwarzanie stringów to podstawa. To ogromny materiał i na pewno nie na jedną noc .