function n ({параметрлар руйхати}: {процедура кийматининг тури});
Мисол:
w=ln( e 3 a +b ln a + ab)-(ln( e 3 c +b ln c + cb)+1)2 +[ln(e3a +cln a + Vac)]4;
a=0,13457; b=2,13458; c=1,71345.
Дастлаб ностандарт функцияни аниклаб оламиз. Сохта параметрлар сифа-
тида х ва у ларни оламиз, у холда f(x,y) = ln(e 3x + y ln x + xy) ностандарт (
фойдаланувчининг) функцияси булади. Берилган функцияни хисоблаш алго-ритмининг блок - схемаси ва дастурини тузамиз.
Гбо—ш-Л Program nsf(input,output);
f(x,y) = ln(e3 x+yln x+Jxy) Var стандарт функцияни тавсиф-
лаймиз}
a , b , c~7 function f(x,y:real):real;
[] f:=ln(exp(3*x)+exp(ln(x)*ln(y))+
w = f (a,b) - ( f (c,b) +1)2 + f (a,c) 4 sqrt(x*y));
— begin
w =
end; begin clrscr; write(‘a=’); readln(a); write(‘b=’); readln(b);
тамомлаш> write(‘c=’); readln(c);
J w:=f(a,b)-sqr(f(c,b)+1)+exp(4*
*ln(int(f(a,c)))); writeln(‘натижа w=’,w:3:6); end.
Назорат саволлари
Кандай алгоритмларга аралаш структурали алгоритмлар дейилади?
Pascal дастурлаштириш тилида массив деганда нимани тушинасиз?
Массивлар дастурнинг кайси кисмида тавсифланади?
www.qmii.uz/e-lib
52
Array операторининг умумий куринишини ёзинг ва изохланг
Матрица неча улчовли массиф булади?
Процедура нима?
Pascal тилида кисм дастурлар кандай ташкиллаштирилади?
Процедура операторининг умумий куринишини ёзинг ва изохланг
Фойдаланувчининг функцияси деганда нимани тушинасиз?
Pascal тилида фойдаланувчининг функцияси деганда нимани тушинасиз?
Pascal тилида процедура ва функция дастурнинг кайси кисмида тавсиф-ланади?
11-маъруза. Мавзу: Pascal тилининг график имкониятлари. Pascal дастурлаштириш тилининг модуллари
Режа:
Pascal дастурлаштириш тилининг модуллари
Pascal тилининг график имкониятлари
Pascal тилида шаклларни буяш усуллари
Pascal тилининг график режимида матнлар хосил килиш
Адабиётлар: 8, 11,12, 13, 19, 22, 24, 29, 38, 40, 41
Таянч иборалар: Pascal тилининг модуллари, модул, System модули, dos модули, crt модули, graph модули, printer модули, overlay модули, матн режими, график режими, чизиклар ва шакллар чизиш, шакларни буяш усуллари
1. Pascal тилининг модуллари
Pascal тилининг хусусан Turbo Pascal (ТР) дастурлаштириш тилининг шун-дай имкониятлари мавжудки, фойдаланувчилар узи ёктирган процедура ва функциялар тупламини ихтиёрий дастурларда ишлатиши мумкин. Бу тупламни эса махсус файл куринишида компьютер хотирасига саклаб куйиб, унга ихтиё-рий вактда ва дастурда мурожаат килиши мумкин. Pascalда бу туплам модул деб юритилади.
Стандарт модуллар Pascal тилининг ижодкорлари тамонидан яратилган бу-либ, улар IBM ва унга турдош компьютерларининг деярли барча функциялари-ни ишлатишга имкон берадиган процедура ва функциялардан ташкил топган.
Pascal дастурлаштириш тилида куйидаги стандарт модуллар ишлатилади: System – узида стандарт процедура ва функцияларни саклайди. Бу модул ТР
юклангандан автоматик ишга тушади ва унга алохида мурожаат этиш шарт
эмас, яъни бу модулни эълон килиш шарт эмас. Dos –MS DOS тизимининг воситаларини ишлатиш имконини беради.
www.qmii.uz/e-lib
53
Do'stlaringiz bilan baham: |