🚀 go-pugleaf

>
>Jakie tam moga byc argumenty i do czego sluza????


to sa zmienne jakie chcesz zapisac do pliku.
Dla tekstowych uzywaj lepiej readln i writeln czyli odczyt i zapis po jednej
lini.


....
fil:text
zm:string
.....
zm:='To jest jedna linia ktora zostanie zapisana do pliku';
writeln(fil,zm);
.......

Kalito napisał(a) w wiadomości: ...
>Na wstepie witam na nowej grupie. Dobrze, ze powstala... Jestem dopiero
>poczatkujacym "programista" i mam jedno pytanie.
>Mianowicie posiadam ksiazke "Nauka programowania dla... juz nie calkiem
>poczatkujacych" panstwa Walczakow. Sa tam podane skladnie instrukcji read i
>write dla plikow tekstowych.
>Opis jest podany w pierwszej czesci ksiazki, ktorej nie posiadam.
>Wyglada to tak:
>read (nazwa_pliku, lista_argumentow);
>write (nazwa_pliku, lista_argumentow);
>
>Jakie tam moga byc argumenty i do czego sluza????


Argumentem jest to, co ma być zapisane do [odczytane z] pliku, np.
VAR
 s :string;
 k :word;
 f  :TEXT;
BEGIN
 assign(f,'plik'); rewrite(f);
 s:='Szczęśliwego nowego roku ';
 write(f,1999,s);
 s:=''; k:=0;
 reset(f);
 read(f,k,s);
 writeln(s,k);
 close(f);
END.

Radzę jednak do plików tekstowych używać :
1. writeln i readln
2. z jednym tylko parametrem

Pozdrawiam.
Piotr.

Kalito napisał(a) w wiadomości: ...
>Hej!
>
>Na wstepie witam na nowej grupie. Dobrze, ze powstala... Jestem dopiero
>poczatkujacym "programista" i mam jedno pytanie.
>Mianowicie posiadam ksiazke "Nauka programowania dla... juz nie calkiem
>poczatkujacych" panstwa Walczakow. Sa tam podane skladnie instrukcji read i
>write dla plikow tekstowych.
>Opis jest podany w pierwszej czesci ksiazki, ktorej nie posiadam.
>Wyglada to tak:
>read (nazwa_pliku, lista_argumentow);
>write (nazwa_pliku, lista_argumentow);
>
>Jakie tam moga byc argumenty i do czego sluza????


odp:
nazwa_pliku - zmienna text albo file of... z ktora powinen byc skojarzony
plik na dysku
                         ten parametr nie jest konieczny (wtedy wypisujesz
na ekran)
lista_arg       - zmienne, stale lub wartosci (wypisane jedna za druga, po
przecinku),
                        ktore maja byc wypisana, zapisane, albo odczytane


np.
program bzdura1;
var odp   :string;
      b        :byte;
      plik    :text;
begin
 writeln;{przechodzi do nastepnej lini}
 write('Czesc, wpisz cos i ENTER: ');
 read(odp);
 assign(plik,'bzdura1.txt');{kojarzy plik ze zbiorem na dysku}
 rewrite(plik);{tworzy plik na dysku}
 for b:=1 to 50 do
   begin
    write  (     ' ',odp,' - ',b,' ');
    writeln(plik,' ',odp,' - ',b,' ');
   end;
 writeln;
 write('Przeczytaj plik ''bzdura1.txt''');
 writeln;
end.by Mariusz

Hej,

  Bez zlosliwosci...

>Mianowicie posiadam ksiazke "Nauka programowania dla... juz nie calkiem
>poczatkujacych" panstwa Walczakow. 

Jednak postaraj sie o cos dla calkiem. Bo tak to duzo czasu stracisz
na zadawanie takich pytan.

Aczkolwiek Twoj wybor...

milego dnia zycze
hej
--
Maciej "MACiAS" Pilichowski
http://www.torun.pdi.net/~macias/                   (+48) (0-56) 66-10-242

          r e p l y ' e   w   s r o d y   i   n i e d z i e l e