🚀 go-pugleaf

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