Práce se soubory III

Nejjednodušší ukázka práce se soubory!
Postup:

1. Uložte si tenhle soubor (text viz níže) na svůj disk.
2. Do stejné složky k němu vytvořte textový soubor s názvem "muj.txt". Obsah tohoto textového souboru může být libovolný. Měl by však obsahovat několik řádků (zhruba 200 znaků či více).
3. Spusťte pascalský program z této ukázky.
4. Tento program 
1. otevře textový soubor "muj.txt"
2. načte soubor "muj.txt"
3. vypíše tento soubor na obrazovku
4. po stisknutí klávesy skončí
5. zavře soubor "muj.txt"

Úkol:
Upravte tento program tak, aby vstupem byl textový soubor a výstupem byla melodie hraná pomocí SOUND.
Vstup bude tvořen dvojicemi číslic frekvence, délka tónu.

Soubory II

Zde najdete dvojici programů. 
První vytvoří soubor, druhý ho čte.

Práce se soubory I

Funkce	Význam
assign(f: file, jmeno)	Přiřadí proměnné typu file jméno souboru
reset(f: file)	Otevře soubor
rewrite(f: file)	Vytvoří nový soubor (nebo přepíše starý se stejným jménem)
append(f: text)	Otevře textový soubor a nastaví pozici na konec souboru
close(f: file)	Ukončí práci se souborem
Filesize(f: file)	Vrátí počet dat stejného typu jako soubor
seek(f: file, pozice)	Přejde na pozici v souboru
filepos(f: file)	Vrátí pozici v souboru
rename(f: file, jmeno)	Přejmenuje soubor na zadané jméno
erase(f: file)	Smaže soubor
eof(f: text): boolean	Logická hodnota - je pozice na konci souboru?
eoln(f: text): boolean	Logická hodnota - je pozice na konci řádku?
readln(f: text, prom)	Načte řádek do textové proměnné
read(f: file, prom)	Načte hodnotu do proměnné stejného typu jako soubor
writeln(f: text, text)	Zapíše text do textového souboru
write(f: file, prom)	Zapíše hodnotu stejného typu jako soubor