--> Archiwum Forum
naughty_girl87 [ Pretorianin ]
program w Pascalu
potrzebuję pełnego kodu do programu w Pascalu, który odczytuje fragment z pliku tekstowego i zapisuje w innym pliku tekstowym. tzn, chodzi mi o to jak go napisać.
będę bardzo wdzięczna za pomoc :)
naughty_girl87 [ Pretorianin ]
up
kastore [ Troll Slayer ]
Daj chwile , poszukam czegoś w starych zasobach programów, albo moge ci je wszystkie wysłać, może znajdziesz coś potrzebnego.
Mój numer gadu w moim profilu.
legrooch [ MPO Squad Member ]
kastore [ Troll Slayer ]
Można zrobić coś takiego
var
plik1,plik2 : text;
tekst : String;
i : integer
begin
assign(plik1,'nazwa1.txt');
assign(plik2,'nazwa2.txt');
reset(plik1);
rewrite(plik2);
for i:=1 to 10 do begin
readln(plik1,tekst);
writeln(plik2,tekst);
end;
close(plik1);
close(plik2);
end.
Assign --> inicjalizuje plik
reset --> otwiera plik, pod warunkiem że plik nazwa1.txt istnieje, jak nie dostaniesz błąd
rewrite --> tworzy i otwiera plik, jak plik istnieje zostanie nadpisany bez pytania, jak nie istnieje, to powstanie.
close --> zamyka plik
ten krótki programik otwiera plik nazwa1.txt i przepisuje pierwsze 10 linijek do pliku nazwa2.txt, pliki musza byc umieszczone tam gdzie masz program.
Możliwe, że musi by
uses Crt;
na początku
Swoją drogą to zaczeliby uczyć Pascala przy użyciu Delphi, przecież nikt już chyba nie pisze w pascalu na konsole.