Chương trình viết bằng ngôn ngữ lập trình bậc cao phải chuyển đổi thành chương trình trên ngôn ngữ máy mới có thể thực hiện được, vì thế chương trình dịch tồn tại để thực hiện việc chu[r]
(1)Đề cương thi học kì Lớp 11B5 Turbo Pascal A Lyù thuyeát Bài 1: Khái niệm Lập trình và Ngôn ngữ Lập trình Laäp trình laø gì? Chöông trình dòch laø gì? Taïi laïi toàn taïi chöông trình dòch? Lập trình là sử dụng cấu trúc liệu và các câu lệnh ngôn ngữ lập trình cụ thể để mô tả liệu và diễn đạt các thao tác thuật toán Chương trình dịch là chương trình đặc biệt có chức chuyển đổi chương trình viết ngôn ngữ lập trình bậc cao thành chương trình thực trên máy tính Chương trình viết ngôn ngữ lập trình bậc cao phải chuyển đổi thành chương trình trên ngôn ngữ máy có thể thực được, vì chương trình dịch tồn để thực việc chuyển đổi đó Chương trình dịch có loại, kể ra, so sánh các loại đó? Chương trình dịch có hai loại là thông dịch và biên dịch Thoâng dòch (interpreter) Bieân dòch (compiler) - Được thực cách lặp lại dãy bước sau: + Kiểm tra tính đúng đắn câu lệnh chöông trình nguoàn; + Chuyển đổi câu lệnh đó thành hay nhiều câu lệnh tương ứng ngôn ngữ máy; + Thực các câu lệnh vừa chuyển đổi - Được thực qua hai bước: + Duyệt, phát lỗi, kiểm tra tính đúng đắn cuûa caùc caâu leänh chöông trình nguoàn + Dịch toàn chương trình nguồn thành chương trình đích có thể thực trên máy và có thể lưu trữ để sử dụng lại cần thiết Như thông dịch, thực câu lệnh luân phiên; không có chương trình đích lưu trữ, biên dịch thực câu lệnh lần; chương trình nguồn và chương trình đích có thể lưu trữ và dùng lại sau Bài 2: Các thành phần ngôn ngữ lập trình Các thành phần gồm; bảng chữ cái, cú pháp và ngữ nghĩa Bảng chữ cái: là tập các kí tự dùng để viết chương trình - Các chữ cái thường và các chữ cái in hoa bảng chữ cái tiếng Anh - 10 chữ số thập phân Ả rập: - Các kí tự đặc biệt: Cú pháp: là quy tắt để viết chương trình, cho biết cách viết chương trình hợp lệ Ngữ nghĩa: xác định thao tác cần phải thực hiện, ứng với tổ hợp kí tự dựa vào ngữ cảnh nó Khaùi nieäm teân, haèng, bieán Tên: là dãy liên tiếp không quá 127 kí tự bao gồm chữ số, chữ cái dấu gạch và bắt đầu chữ cái gạch Trong Pascal không phân biệt chữ hoa, chữ thường - Tên dành riêng: dùng với ý nghĩa riêng, không dùng với ý nghĩa khác VD: program, uses, const, type, var, begin, end - Tên chuẩn: tên dùng với ý nghĩa định, cần dùng với ý nghĩa khác thì phải khai báo VD: abs spr sqrt integer real longint byte break extended - Tên người lập trình đặt: dùng với ý nghĩa riêng, xác định cách khai báo trước sử dụng Các tên này không trùng với tên dành riêng Trang:1 Trường THPT Võ Minh Đức Lop11.com (2) Đề cương thi học kì Lớp 11B5 VD: 11B5 B5 VMD Tai_Handsome 11B5ThItOT Hằng : là đại lượng có giá trị không thay đổi quá trình thực chương trình - Hằng số học là số nguyên hay số thực (dấu phẩy tĩnh hay dấu phẩy động) VD: -5 1.8 -22.36 2.23E01 - Hằng logic: là giá trị đúng sai tương ứng với true false VD: TRUE FALSE - Hàng xâu: là dãy kí tự mã ASCII Khi viết, dãy kí tự đặt cặp dấu nháy VD: ‘Information’ ‘Lop 11B5’ Biến: là đại lượng đặt tên, dùng để lưu trữ giá trị và giá trị có thể thay đổi quá trình thực chương trình Baøi Caáu truùc chöông trình [<phaàn khai baùo>] [<phaàn thaân>] Phaàn khai baùo Khai báo tên chương trình (phần này khai báo không): program <tên chương trình>; Khai baùo thö vieän: uses crt; Khai baùo haèng: const <teân haèng> = <giaù trò>; VD: const pi = 3.1416; Khai báo biến: var <danh sách biến> : <kiểu liệu>; - Trong đó kiểu liệu là gồm: + Kiểu nguyên: byte(bộ nhớ lưu trữ giá trị:1 byte; phạm vi giá trị: đến 255), integer (2 byte; 15 15 -2 -> -1), word(2 byte; -> 216-1), longint(4 byte; -231 -> 231-1) + Kiểu thực: real(6 byte; có giá trị tuyệt đối nằm phạm vi từ 10-38 -> 1038), extended (10 byte; có giá trị tuyệt đối nằm phạm vi từ 10-4932 -> 104932) + Kiểu kí tự: char ( 1byte; 256 kí tự mã ASCII) + Kiểu logic: Boolean (1 byte; true false) VD: var x1, x1 : real; var X, Y, Z: real; C : char; N : word; I, J : byte; Phaàn thaân: begin [<daõy leänh>]; end Các câu lệnh đã học Caâu leänh gaùn: <tên biến> := <biểu thức>; VD: x1 := (-b + sqpt(delta))/(2*a); Nhập liệu từ bàn phím: Read (<danh sách biến vào>); readln (<danh sách biến vào>); VD: read(a,b,c); readln(a,b,c); Đưa liệu màn hình: Write (<danh sách kết ra>); writeln (<danh sách kết ra>); VD: write(‘Chao ban, chuc ban dat ket qua tot ki thi nay’); writeln(‘Chao ban, chuc ban dat ket qua tot ki thi nay’); Ngöng vaø ñöa keát quaû maøn hình: Readln; Trang:2 Trường THPT Võ Minh Đức Lop11.com (3) Đề cương thi học kì Lớp 11B5 Caâu leänh if-then - Daïng thieáu: If <ñieàu kieän> then <caâu leänh>; VD: if b>max then max := b; - Dạng đủ: If <ñieàu kieän> then <caâu leänh 1> else <caâu leänh 2>; VD: if (a mod = 0) then write(a,’ la so chia het cho 3’) else write(a,’ la so khong chia het cho 3’); Caâu leänh gheùp Begin <caùc caâu leänh>; End Caâu leänh laëp for-do - Daïng laëp tieán For <biến đếm> := <giá trị đầu> to <giá trị cuối> <câu lệnh>; VD: S := 0; for i := to 10 then S := S + 1; - Daïng laëp luøi: For <biến đếm> := <giá trị cuối> downto <giá trị đầu> <câu lệnh>; VD: S := 0; for i := 10 downto S := S+1; B Moät soá daïng baøi taäp 1) Viết chương trình thực hiện, nhập vào các cạnh tam giác, sau đó kiểm tra tính đúng đắn và tính chu vi vaø dieän tích tam giaùc Program giaitamgiac; Uses crt; Var a,b,c,p,k1,k2,k3 : real; Begin Clrscr; Writeln(‘Nhap vao ba canh cua tam giac: ‘); read(a,b,c); k1:= a+b; k2:= a+c; k3:= b+c; if (a<=0) or (b<=0) or (c<=0) or (k1<=c) or (k2<=b) or (k3<=a) then write(‘Cac cach tren khong hop mot tam giac.’) else begin Writeln(‘Chu vi tam giac la: ‘, a+b+c:5:2); p := (a+b+c)/2 ; write(‘Dien tich tam giac la : ‘,sqrt(p*(p-a)*(p-b)*(p-c)) :5 :2) ; end; readln; end 2) Viết chương trình nhập vào bán kính r, thực tính chu vi và diện tích hình tròn Program giaihinhtron; Uses crt; Const pi =3.1416; Var r : real; Begin Clrscr; Trang:3 Trường THPT Võ Minh Đức Lop11.com (4) Đề cương thi học kì Lớp 11B5 Writeln(‘Nhap vao ban kinh hinh tron: ‘); read(r); If r<=0 then write(‘Ban da nhap sai ban kinh Vui long nhap lai.’) else Writeln(‘Chu vi hinh tron la: ‘, 2*pi*r:5:2,’ dien tich hinh tron la : ‘,pi*r*r :5 :2); readln; end 3) Viết chương trình nhập vào các giá trị a, b, c, sau đó giải phương trình a2x + bx + c = Program giaipt; Uses crt; Var a,b,c,x1,x2,D : real; Begin Clrscr; Writeln(‘Nhap vao he so a, b, c cua phuong trinh: ‘); read(a,b,c); If a=0 then begin Writeln(‘Phuong trinh da cho tro Phuong trinh bac nhat ‘); If b=0 then If c=0 then write (‘Phuong trinh co vo so nghiem.’) Else write (‘Phuong trinh vo nghiem.’) Else write(‘Va phuong trinh da cho co nghiem x = ‘,– c/b:5:2); End Else begin D:=sqr (b) – 4*a*c; If D<0 then write(‘Phuong trinh da cho vo nghiem.’) Else if D=0 then write (‘Phuong trinh da cho co nghiem kep x1 = x2 =‘, –b/(2*a):5:2); Else Begin x1 := (–b+sqrt(D))/(2*a); x2 := –b/a –x1; write (‘Phuong trinh co hai nghiem phan biet x1= ‘,x1:5:2,’ va x2 = ‘, x2:5:2); end; end; readln; end 4) Viết chương trình nhập vào số tự nhiên n và thực tổng sau S= 1/1!+1/2!+1/3!+….+1/n! Program tinhtong; Uses crt; Var n,i, : byte; p,S :real; begin write(‘Nhap n: ‘); read(n); S:=1; p:=1/2; S:=S+p; For i:=3 to n Trang:4 Trường THPT Võ Minh Đức Lop11.com (5) Đề cương thi học kì Lớp 11B5 Begin p:=1/i *p; S:=S+p; End; Write(‘S=’,S); End 5) Viết chương trình nhập vào số , tìm số lớn Program max; Var a1,a2,a3,a4,a5: real; Begin Write(‘Nhap vao nam so:’); Read(a1,a2,a3,a4,a5); Max:=a1 If max<a2 then max:=a2; If max<a3 then max:=a3; If max<a4 then max:=a4; If max<a5 then max:=a5; Write(‘ max la’,max:5:2); Readln; End 6) Viết chương trình nhập vào số nguyên dương n thực tính tổng các số lẻ n và chia hết cho Program tinhtong; Var n:byte; Begin Write(‘Nhap vao n: ’); Read(n); T:=0; For i:=(n-1) downto if (i mod = 0) and (i mod 2<>0)then T:=T+i; Write(‘tong la:’T); Readln; End 7) Hãy cho biết giá trị T sau đoạn lệnh sau : T := ; For i :=2 to 10 If i mod = then T:= T+1; Đáp án T = 8) Hãy thêm vào dòng lệnh phù hợp để T đạt giá trị là 10 T:= 0; For i:=30 downto Đáp án: Cách 1: if i mod 10 = then T:=10; Cách 2: If i = 10 then T:=i; Cách 3: if i mod = then T:= T+1; 9) Hãy thực bước để tính giá trị T và S đoạn lệnh sau đây S := 1; T := 0; For i := 10 downto For j := to i Begin Trang:5 Trường THPT Võ Minh Đức Lop11.com (6) Đề cương thi học kì Lớp 11B5 T := T+1; S := S+T; End; Đáp án: T = 45; S =1036 10) Giải bài toán cổ “Vừa gà vừa chó Boù laïi cho troøn Ba möôi saùu Moät traêm chaân chaün” Hỏi có bao nhiêu loại? Program toanco; Var ga,cho:byte; Begin For cho:=1 to 24 {vi 100÷4 = 25, vay so cho co the la 1->24 con} Begin ga:=36 – cho ; if ga*2 + cho*4 = 100 then write(‘Vay co tong so ga la ‘, ga,’ va tong so cho la ‘,cho,’ con’) end; readln; end 11) Vieát chöông trình nhaäp vaøo ba soá nguyeân döông a, b, c Kieåm tra xem chuùng coù phaûi laø boä soá Pi-ta-go không Sau đó xuất kết màn hình Program Pi_ta_go; Var a, b, c: integer; a2,b2,c2: longint; begin write(‘Nhap a, b, c : ‘); readln(a,b,c); a2 := a*a; b2 := b*b; c2 := c*c; if (a2=b2+c2) or (b2=a2+c2) or (c2=a2+b2) then write (‘Ba so la bo so Pi-ta-go.’) else write (‘Ba so khong phai la bo so Pi-ta-go.’); readln; end Bộ đề cương này và đề cương trước tóm tắt ý chính nên có khoảng 95% là tửu, để đạt điểm cao các bạn đọc thêm caùc phaàn saùch giaùo khoa vaø phaàn “caâu hoûi vaø baøi taäp”… Chuùc baïn may maén Trang:6 Trường THPT Võ Minh Đức Lop11.com (7)