|
![](/i/favi32.png) Alqoritm, xassələri və təsvir üsullarıAlqoritmlesdirme-ve-Programlasdirma
Begin
AssignFile
(f,”a:\test.txt”);
Append
(f);
For
i=4
to
6
do
Writeln
(f, “
Sətir N
”,i);
CloseFile(
f
);
End;
a
diskində olan
test.txt
faylindakı yazilara 4,5və 6-cı sətirlərdə
Sətir N4, Sətir N5
və
Sətir N6
yazıları əlavə
(Append)
olunacaq.
2.
Mətn faylından informasiyanın oxunması
TurboPaskal proqramından əvvəlcədən mətn faylına (genişlənməsi .txt olan)
yazılmış informasiyaları çağırmaq və onlardan istifadə etmək olar. İnformasiya oxunan
zaman faylda yazılmış verilənlər proqram dəyişənlərinə mənimsədilir. Bundan ötrü
verilənlərin qiymətləri yazılmış fayl açılmalıdır. Faylın açılması üçün
Reset
(f)
prosedurasından istifadə olunur. Bu proseduradan əvvəl
f
(fayl dəyişəni) mütləq konkret
faylla bağlanlanmalıdır. Məs.:
AssignFile
(f,”c:\data.txt”);
f – c diskindəki
data.txt
faylıdır
Reset
(f);
f-lə işarələnən faylı aç
Əgər fayl yoxdursa və ya düzgün açılmayıbsa
IO Result
funksiyasının köməyilə
bunu yoxlamaq olar:
Repeat
res:=
IO Result;
if
res<>0
then
answ:
=”
Faylın açılışında səhv var
”
Until
(res=0)
downloaded from KitabYurdu.org
|
|
|