Turbo pascal - pliki tekstowe

eerroorr · Post autor: **eerroorr** » 5 sty 2007, o 20:11

Mam taki program w turbo pascalu:
program I;
var txt:string;
tekst:text;
begin
assign(tekst,TEKST.TXT);
rewrite(tekst);
writeln('Napisz tekst');
writeln;
readln(txt);
writeln(tekst,txt);
close(tekst);
end.

Wyjaśnijcie na czym polega działanie takiego programu i jak to w ogóle uruchomić ??

jasny · Post autor: **jasny** » 5 sty 2007, o 20:25

Program wyświetla 'Napisz jakiś tekst'
Ty piszesz jakiś tekst (string) dopóki nie naciśniesz Enter, po czym tekst jest zapisywany do zmiennej txt, która z kolei jest zapisywa do zmiennej tekst (która oznacza plik TEKST.TXT). Wynikiem jest plik TEKST.TXT (nie ma ścieżki, więc domyślnie w tym katalogu, który masz ustawiony w Pascalu), w którym jest tekst który napisałeś. A jak uruchomić? Jak każdy program w Pascalu.

eerroorr · Post autor: **eerroorr** » 5 sty 2007, o 21:20

próbowałem go uruchomić, ale pokazuje błąd - Invalid qualiefier- w tej linii:
assign(tekst,TEKST.TXT)

Sokół · Post autor: **Sokół** » 5 sty 2007, o 21:24

no i nic dziwnego, jest tak:

Kod: Zaznacz cały

 assign(tekst,TEKST.TXT);

a powinno

Kod: Zaznacz cały

assign(tekst, 'TEKST.TXT');