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

function fact (n: integer): integer;
var
j: integer; P: byte;
begin
j:=1;
for p:=1 to n do j:= j * p;
fact :=j;
end;
begin
readln (k, m);
y:= (fact (20) + fact(3))/(fact(5) + fact (31)) * fact(k+1) / fact(m);
writeln( y);
end.
Функцияларни ани=лашда доим шундай щаракат =илиш лозимки, унинг тана =исмида формал параметрлар ва функцияни ани=лаш учун зарур былган локал ызгарувчиларгина =атнашсин. Программанинг глобал ызгарувчисига иложи борича процедура ёки функция ичидан туриб =иймат бермаслик керак, акс щолда программа хато натижа бериши мумкин.
Мисол:
Program m1;
Var x,y: integer;
Funktion f(t: integer): integer;
Begin
f:=t*t;
x:=7;
end;
begin
x:=5; writeln(x);
y:=f(2)+x
writeln(x,y)
end.
Бу программанинг ишлаши натижасида x=5, y=11 ва x=7 =ийматлар экранга чи=арилади, яъни функциянинг ички =исмидаги x=7 =иймати асосий дастурдаги натижавий =ийматларга ыз таъсирини ытказмо=да.
2. Рекурсив функциялар
Паскал тилида процедура – функциялар билан ишлашда, функцияларнинг рекурсивлик хоссасидан фойдаланиш имконияти яратилган.
Рекурсия тушунчасига мисол =илиб оддий факториал щисоблашни келтириш мумкин:

бу ерда кыриниб турибдики n! =иймати (n-1)! ор=али ани=ланаяпти, яъни рекурсия дегани ызи ор=али ызини ани=лаш маъносини англатади.
Паскал тили щам функцияларни рекурсив ани=лаш имкониятини беради. Функцияни рекурсив ани=лаш унинг тана =исмида ызига - ызи мурожаат =илиш ор=али амалга оширилади.
Ю=оридаги факториал щисоблашни рекурсив функциялар ор=али амалга оширайлик:


program L1;
var
n: integer; y: integer;