1-маъруза: Математик моделлаштиришнинг асосий тушунчалари, масалаларни эщмда ечиш бос=ичлари ва алгоритмлар назарияси

Reset процедураси.

Вазифаси:	мавжуд файлни очади.
Ани=ланиши:	Reset (f: file); бу ерда f – файлнинг ихтиёрий типига мос файлли ызгарувчи ва бу ызгарувчи файл билан Assign процедураси ор=али бо\ланган былиши керак. Reset процедураси мазкур файлни очади.
Rewrite процедураси.
Вазифаси:	янги файлни яратади ва очади.
Ани=ланиши:	Rewrite (f: file); бу ерда f – ихтиёрий файлли типдаги файлли ызгарувчи. Rewrite процедурасини ишлатишдан олдин f ызгарувчи Assign процедураси ёрдамида дискдаги файл билан бо\ланиши керак. Rewrite процедураси янги файл ташкил =илади.
Write процедураси.
Вазифаси:	файл щадига ызгарувчини ёзиб =ыяди.
Ани=ланиши:	Write (f, v); бу ерда f – файлли ызгарувчи; v - f файлининг щади билан бир хил типли ызгарувчи.

Олдинги тузган программамиз «d:» дискдаги tp каталогида myfile.dat файлини ташкил =илди. Энди шу файлдан =андай =илиб маълумотларни ы=ишни кыриб чи=айлик.

Var
mydata: file of integer;
i, j, sum: integer;
begin
assign (mydata, ‘d:\tp\myfile.dat’);
reset (mydata); {файл ы=иш учун очилмо=да}
writeln (‘Салом номаълум ырто=...’);
read (mydata, i);
writeln (‘myfile.dat файлидан биринчи сон ы=илди’);
read (mydata, j);
writeln (‘дискдаги myfile.dat файлидан
иккинчи сон ы=илди’);
read (mydata, sum);
writeln (‘myfile.dat файлидан учинчи сон ы=илди’);
close (mydata); {mydata файли ёпилади}
writeln (‘Хайр номаълум ырто=...’);
end.


Text стандарт файлли тип матнли файлларни ани=лайди. Матнли файллар ызаро янги =аторга ытиш белгилари билан ажратилган =аторлардан ташкил топади.
Матнли файллар билан ишлаш учун махсус киритиш (Readln) чоп этиш (Writeln) процедуралари кызда тутилган. Бу процедуралар узунлиги номаълум каторларни файллардан ы=иш ва файлларга ёзиш учун ишлатилади.
Энди матнли файллар билан ишлашга доир =уйидаги программа билан танишиб чи=айлик:
var
mytext: text;
s: string;
begin
assign (mytext, ‘d:\tp\mytext.txt’);
{mytext файлли ызгарувчи оркали файл
исми ва йыли ани=ланмо=да}
rewrite (mytext);
{файл ёзиш учун очи=}
writeln (‘Сизнинг исмингиз?’);
readln (s);
writeln (‘Исмингизни дискдаги mytext.txt файлига ёзилмо=да’);
writeln (mytext, s);
{s - =атори mytext.txt файлига ёзилмо=да}
close ( mytext);
{mytext файли ёпилди}
end.
Назарий саволлар ва таянч ибоарлар:

1. 
   Файлли типдаги ызгарувчиларни эълон =илишда =айси щизматчи сызлардан фойдаланилади?
   
2. 
   Типлаштирилган файлларга таъриф беринг;
   
3. 
   Типлаштирилмаган файлларга таъриф беринг;
   
4. 
   Файллар билан ишлаш программаларидан наъмуналар келтиринг;
   
5. 
   Файлли типлар билан ишловчи процедураларнинг вазифаларини тушунтиринг;
   
6. 
   Файлни ташкил этиш ва ундан маълумот ы=иш программаларини тузинг;
   
7. 
   Матнли файллар билан ишлаш программаларидан наъмуналар келтиринг.