Паскаль тіліндегі сызықтық програма есептері

Пән: Информатика, Программалау, Мәліметтер қоры
Жұмыс түрі: Материал
Тегін: Антиплагиат
Көлемі: 9 бет
Таңдаулыға:

Экономикалық технологиялар колледжі

Pascal тілінде есептер жинағы

Орындаған:

Орал, 2017

Жоспары
Кіріспе
1.Паскаль бағдарламалау тілі
2. Паскаль тіліндегі сызықтық програма есептері
Қорытынды
Пайдаланылған әдебиеттер тізімі

Кіріспе
ЭЕМ-дер пайда болғаннан кейiн оларға сәйкес келетiн бағдарлама керек болды. ЭЕМ әр түрлi жаңа есептердi шешуiне байланысты бағдарламалық қамсыздандыру да дами түстi.
Мәселенi компьютерде шешу үшiн оның алгоритмiн жасап, бұл алгоритмдердi компьютер түсiнетiн нұсқаулар және заң-ережелер негiзiнде жазуымыз керек болады. ЭЕМ-де есептердi шешу үшiн қарапайым бағдарламаларды құрып бiлудiң өзi компьютерлiк сауаттылықтың бiр бөлiгi болып саналады.
Бағдарлама дегенiмiз - бұл компьютер орындайтын командалар жиынтығы. Басқаша айтқанда, алгоритмдi машина түсiнетiн тiлде жазу. Барлық есептеу машиналарының негізгі ерекшелігі оның жұмысына басқарудың бағдарламалық принципі енгізілген. Бұл ЭЕМ нәтиже беру үшін жеңіл есептермен бірге күрделі есептерге де қолданушы орындалуын немесе бұйрықтар тізімін қолдану керек.
Сонымен ЭЕМ-де есептерді шешу үшін алдын-ала әрекеттерді анықтау (алгоритмдеу) керек. Алдын - ала анықталған мақсатқа жету үшін, есепті шешу үшін орындаушыға қажетті амалдардың тізбегін анық көрсететін ережелер жүйесін алгоритм деп атайды.
Алгоритм түсінігі есепті шешу әдісі түсінігімен тығыз байланысты. Әдіс деп қатаң негізделген есепті шешу тәсілі мен оны қолдануға болатын берілген мәліметтер бойынша есептер тобын анықтау мақсатында құрылған тәсілді зерттеуді айтады.
Ал, алгоритм есепті шешу мен тәжірибеде қолдану әдісін сипаттау болып табылады. Ол әдісті зерттеу нәтижесі бойынша құрылады.

1.Паскаль бағдарламалау тілі
1964 ж. ақпаратты өңдейтін халықаралық IFIP федерациясына Алгол-60 бағдарламалау тілінің жаңа нұсқасын шығаруға көптеген елдердің ғалымдары жиналды. Осы ғалымдардың ішінде Стэнфордтық университеттегі Информатика кафедрасының доценті швецариялық Никлаус Вирт та болды. Вирт Швецарияға қайтып оралғаннан кейін жаңа бағдарламалау тілін ойлап тапты. 1968 ж. Н.Вирт Георих қаласындағы технологиялық институтында Паскаль тілінің ең бірінші нұсқасын шығарды. 2 жыл өткеннен кейін осы тілдің бірінші компиляторы пайда болды. Жаңа тіл пайда болғаннан кейін оны тұтынушылар және тілге қызығушылар көбейді. 1974 ж. Паскаль тілінің жаңа нұсқасы пайда болды. Ал келесі тілдің стандарттық операторлары шықты.
Вирт Паскаль тілін шығаруда 2 ережеге сүйенді:
1) бағдарламаны оқуда тіл жүйелі болу керек;
2) тілді есептеуіш машинада пайдалануда қарапайым және тиімді болу керек.
Тілдің компиляторы кез келген алгоритмді бірнеше құрылымдық түрде көрсетуге болады.
1985 ж. ТурбоПаскаль тілінің үшінші нұсқасы пайда болды. Жалпы білім оырндарында 1-ші бағдарламалау тілі болып Паскаль тілі қолданылады. ТурбоПаскальдың төртінші нұсқасына бұрынғыларға қарағанда өзгерістер енді. ТурбоПаскальдың 4-нұсқасына Модуль-2 тілінен UNIT-концепциясы енгізілді. Бұл ТурбоПаскальда үлкен бағдарламаларды шешуге мүмкіндіктер берді.
ТурбоПаскальдың 5-нұсқасы пайда болғаннан кейін кәсіби тұтынушылардың мүмкіндіктері де көбейді. ТурбоПаскальдың осы нұсқасында графикалық мүмкіндіктер болды. Бұл мүмкіндікті ТурбоПаскаль пакетінде қамсыздандырылған VGA (VideoGraphicsArray) графикалық адаптермен қолданды.
ТурбоПаскальдың 6-нұсқасы объектілердің жиынтығын пайдаланып, тұтынушының қолданбалы есептерін, теориялық концепциясын бағдарламалауды ұсынды. Жаңа мүмкіндіктерді тәжірибелік мысалдарда қолдану негізінде мәтіндік редактор құрылды. ТурбоПаскальдың 6-нұсқасында тұтынушының жұмысын жеңілдету үшін мәтіндік редактор ғана емес, тышқанды да қолданды.
1992 ж. Borland International фирмасы ТурбоПаскальдың 7-нұсқасын ойлап шығарды. Бұрынғы нұсқаларға қарағанда 7-нұсқасына көптеген өзгерістер енді. Біріншіден, мәтінді түстерге бояуға (тәжірибесіз тұтынушылар мәтін енгізу кезінде қатені жөндеп отыруға), екіншіден, күнделікті есептер шешуге (массивтерді шешуге) мүмкіндік берді.

2. Паскаль тіліндегі сызықтық програма есептері
1. d айнымалысына:
а) x,y,z сандарының арифметикалық орта шамасын;
б) жазықтықтағы координаталары (х1,у1), (х2,у2) болатын нүктелердің арақашықтығын меншіктеу операторларын жазыңыз.
Шешуі:
a) d:=(x+y+z)3;
б) d:=sqrt(sqr(x2-x1)+sqr(y2-y1)).

2. х және у айнымалыларының мәндерінің орнын ауыстыратын меншіктеу операторын жазыңыз.
а) қосымша айнымалыны пайдаланып;
б) қосымша айнымалыны пайдаланбай.
Шешуі:
a) a:=x; x:=y; y:=a;
б) x:=x+y; y:=x-y; x:=x-y.

3.x,y,z айнымалыларының мәндерін х айнымалысында у айнымалысының мәні, у-те z айнымалысының мәні, ал z-те x айнымалысының бұрынғы мәні болатындай етіп меншіктеу операторларын жазыңыз.
а) қосымша айнымалыны пайдаланып;
б) қосымша айнымалыны пайдаланбай.
Шешуі:
a) a:=x; x:=y; y:=z; z:=a;
б) x:=x+y; y:=x-y; x:=x-y; y:=y+z;z:=y-z; y:=y-z.

4. Берілген а үшін көбейтуден басқа амал қолданбай мыналарды алуға болатын меншіктеу операторын жазыңыз:
а) а9-ды 3 амал арқылы;
б) а10-ды 3 амал арқылы;
в) а13-ті 4 амал арқылы;
г) а21-ді 4 амал арқылы;
д) а64-ті 6 амал арқылы;
е) а3 және а10-ды 4 амал арқылы;
ж) а11 және а20-ны 5 амал арқылы;
з) а5 және а9-ды 4 амал арқылы;
и) а5 және а13-ті 4 амал арқылы;
к) а2,а5 және а17-ні 3 амал арқылы;
л) а4,а12 және а28-ді 4 амал арқылы.
Шешуі:
а) a2:= а*а; a4:= a2*a2; a9:=a4*a4*a;
б) a2:= а*а; a4:= a2*a2; a10:=a4*a4*a2;
в) a2:= а*а; a4:= a2*a2; a12:=a4*a4*a4; a13:= a12*a;
г) a2:= а*а; a4:= a2*a2; a10:=a4*a4*a2; a21:= a10* a10*a;
д) a2:= а*а; a4:= a2*a2; a8:= a4*a4; a16:= a8* a8; a32:= a16* a16;
a64:=a32* a32;
е) a2:= а*а; a3:= a2*a; a5:= a3* a2; a10:= a5* a5;
ж) a2:= а*а; a3:= a2*a; a5:= a3* a2; a11:= a5* a3* a3; a20:=a11*a5*a3*a;
з) a2:= а*а; a3:= a2*a; a5:= a3*a2; a9:= a5* a3*a;
и) a2:= а*а; a3:= a2*a; a5:= a3*a2; a13:= a5* a5* a3;
к) a2:= а*а; a5:= a2*a2*a; a17:= a5* a5* a5* a2;
л) a2:= а*а; a4:= a2*a2; a12:=a4*a4*a4; a28:= a12* a12* a4.

5. Ұзындығы а, ені в-ға тең тіктөртбұрыш ауданын есептеңіз.
Program e-5; {тіктөртбұрыш ауданын есептеу}
Var a,b,s: real;
begin
writeln; write(`ұзындығы-a мен ені-b-ға мән енгіз:'); read(a,b);
S:=a*b;
writeln; write(`тіктөртбұрыш ауданы=',s)
end.
Мыс: а=3м, b=4м ,болғанда s=12м2.

6. Цилиндрдің ... жалғасы

Сіз бұл жұмысты біздің қосымшамыз арқылы толығымен тегін көре аласыз.