Bài giảng Lập trình Pascal

Bài giảng Lập trình Pascal bao gồm những nội dung về thuật toán và sơ đồ khối; ngôn ngữ lập trình Pascal; cấu trúc một chương trình Pascal; một số lệnh cơ bản trong Pascal. Với các bạn chuyên ngành Công nghệ thông tin thì đây là tài liệu hữu ích.
Nội dung trích xuất từ tài liệu:
Bài giảng Lập trình PascalLẬPTRÌNHPASCALNộidungchitiết Thuậttoánvàsơđồkhối NgônngữlậptrìnhPascal CấutrúcmộtchươngtrìnhPascal MộtsốlệnhcơbảntrongPascalThuậttoánvàsơđồkhối Cácgiaiđoạngiảimộtbàitoántrênmáytính điệntửThuậttoánvàsơđồkhối Thuậttoán(algorithm):Thuậttoánlàmộtphươngphápdùnggiảiquyếtmộtbàitoántheomộttiếntrìnhxácđịnhvớicácbướchữuhạn.Thuậttoánvàsơđồkhối Mộtsốquiướckýhiệulưuđồ: Kýhiệu Môtả Điểm bắt đầu và kết thúc một thuật toán. Thaotácnhậphayxuấtdữliệu. Khốixửlýcôngviệc. Khốiquyếtđịnhchọnlựa. Dòng tính toán, thao tác của chương trình.Thuậttoánvàsơđồkhối Vídụ:Thuậttoángiảiphươngtrìnhbậcnhất:ax +b=0,tađiquacácbước:Bước1:Nhậpvào2hệsốavàb.Bước2:Xétđiềukiệna=0?Nếuđúnglàa=0,thìđiđếnbước3.Nếukhông,nghĩalàa≠0,thìđiđếnbước4.Bước3:Xétđiềukiệnb=0?Nếub=0,thìbáophươngtrìnhcóvôsốnghiệm.Ðiđếnbước5.Nếub≠0,thôngbáophươngtrìnhvônghiệm.Ðiđếnbước5.Thuậttoánvàsơđồkhối Bắt đầu Nhập a, b Saix = -b/a a=0 ? Đúng Sai b=0 Phươngtrình vô nghiệm ? Đúng Phươngtrình vô số nghiệm Kết thúcNgônngữlậptrìnhPascalPascallàngônngữlậptrìnhdoNiklausWirth,giáosưTrườngĐạihọckỹthuậtZurich–Thụysĩsángtạovàcôngbốvàođầunăm1970.KhởiđộngvàthoátkhỏiPascal Cách1(khởiđộngtừWindows):doubleclickvào biểutượngchươngtrìnhPascaltrênDesktop. Cách2(khởiđộngtừMSDOS):chuyểnđếnthư mụcchứachươngtrìnhPascal.GõTURBOvànhấn Enter. PASCALThoátkhỏiPascal Cách1:NhấnALT+XCấutrúcmộtchươngtrìnhPascal Programtenchuongtrinh; Var Khaibáobiến Begin Thânchươngtrình End.MộtsốlệnhcơbảntrongPascal Lệnhgán:= LệnhxuấtdữliệuramànhìnhWRITE, WRITELN LệnhnhậpdữliệutừbànphímREAD,READLN LệnhđiềukhiểnIF…ELSE LệnhlặpFOR,WHILE…DOLệnhgán Dùngđểgángiátrịcủamộtbiểuthứcchomột biến.Cúpháp:MộtsốlệnhcơbảntrongPascalLệnhxuất Dùngđểxuấtramànhìnhcâuthôngbáo,giátrị củamộtbiến,biểuthức.Cúpháp: Dạng1:WRITE(‘thongbao’); Dạng2:WRITE(bien1,bien2,…); Dạng3:WRITELN(bien1,bien2,…); Dạng1:dùngđểxuấtcâuthôngbáoramàn hình. Dạng2:dùngđểxuấtgiátrịcủabien1,bien2,…Mộtsốvídụcơbản Vídụ1:Programvidu1;BeginWriteln(‘TrungtamTinhocTruongCDKTCaoThang’);Writeln(‘*************************’);Writeln(‘BAITAPPASCALCOBAN’);Readln;End. Vídụ2:tínhtổnghaisốnguyêndongườidùng nhậpvàotừbànphím.Programvidu2;Vara:integer;b,s:integer;BeginWriteln(‘Nhapsoa=’);Readln(a);Writeln(‘Nhapsob=’); LệnhđiềukhiểnDùngđểxuấtramànhìnhcâuthôngbáo,giátrịcủamộtbiến,biểuthức.Cúpháp:Dạng1:IFTHEN;Dạng2:IFTHEN ELSE ; Vídụ3:chươngtrìnhchophépnhậpvào1số nguyêna.SauđóxuấtrathôngbáoCHAOBAN nếungườidùngđãnhậpsốdương.Programvidu3;Vara:Integer;Begin Write(‘Nhapsoa:‘); Readln(a); Ifa>0then Write(‘CHAOBAN’); Vídụ4:chươngtrìnhchophépnhậpvào2số nguyêna,b.Sauđóchobiếtsốnàolớnhơn.Programvidu4; Vara,b:Integer;Begin Write(‘Nhapsoa:‘); Readln(a); Write(‘Nhapsob:‘); Readln(b); Ifa>bthen ...