Bài 1: Chuyển đổi biểu thức toán học sau sang biểu diễn trong Pascal: a. 1 + 1 + 1 b. 0x5 x y z e. x2 4x1 f.(x3)23x1 c. p(pa)(pb)(pc) g.3x2 x d. bCosx ab 2b  xy  8 h. a2b2 x2 y2 Bài 2: Cho chương trình viết bằng NNLT Pascal sau: Program Kiem_tra; Const lop=11; Begin write(‘Pascal xin chao cac ban lop ’,lop); Readln; End. 2x {dòng 1} {dòng 2} {dòng 3} {dòng 4} {dòng 5} {dòng 6} a) Hãy cho biết phần khai báo, phần thân chương trình từ dòng nào đến dòng nào? b) Chương trình trên cho kết quả là gì? Bài 3: Cho chương trình viết bằng NNLT Pascal sau: Program Kiem_tra; Var x,y: byte; Begin x:=1; y:=10; write(‘Gia tri cua A la:’, x*y-1); Readln; End. a) Hãy cho biết ý nghĩa của dòng lệnh thứ 1 và thứ b) Chương trình trên cho kết quả là gì? {dòng 1} {dòng 2} {dòng 3} {dòng 4} {dòng 5} {dòng 6} {dòng 7} 2 1 Bài 4: Tìm lỗi sai trong các chương trình sau: a. Program Tinh_Tong; Var i,n:=Integer; tong: Real ; BEGIN Write(' Nhap n : ') Readln(n) ; tong :=0 ; For i: 1 to n do tong = tong + 1/i ; Writeln (' Tong la : ', tong:8:2 ); Readln; END. b. Program Tinh_Tong; Var: n,i:Word; S : Real ; BEGIN S=0 ; For i := 1 downto 100 do S := S + 1/sqr(i) ; Writeln (' S = ', S:5:2) ; Readln’ END Bài 5: a. Viết chương trình nhập 1 số nguyên a bất kì không âm. Xuất ra màn hình thông báo a là số chẵn hay số lẻ? b. Viết chương trình nhập 1 số thực x bất kì khác 0. Xuất ra màn hình thông báo x là số âm hay số dương. c. Viết chương trình tính và xuất ra màn hình tổng sau: S = 1 + 2 + 3 +...+ 50 d. Viết chương trình tính và xuất ra màn hình tổng bình phương các số nguyên từ 1 đến 20. e. Viết chương trình nhập vào 2 số nguyên dương M, N (M<N), tính và đưa ra màn hình số lượng các số chẵn và số lượng các số lẻ trong phạm vi từ M đến N.