BÀI TẬP
tin học lớp 8

Bài 1: Chuyển biểu thức được viết trong pascal
(x*x +1)*(x*x +1)/b-a thành biểu thức toán:


A.
B.
C.
D.
17/5 =3; 17 div 5 = 2;
17 mod 5 = 3
Bài 2. : Bốn bạn A, B, C, D đưa ra kết quả của phép chia,
phép chia lấy phần nguyên và lấy phần dư của hai số nguyên
17 và 5. Hãy chọn bạn làm đúng:
17/5 = 3; 17 div 5 = 2;
17 mod 5 = 3
17/5 = 4; 17 div 5 = 3;
17 mod 5 = 2
17/5 = 3.4; 17 div 5 = 3;
17 mod 5 = 2
A.
B.
C.
D.
Bài 3. Trong Pascal, khai báo nào sau đây đúng (D)?
khai báo nào sai (S)?

var begin: real;
A.
var diem: integer;
B.
const a = 30;
C.
const a: real;
D.
S
Đ
Đ
S
Đ
S
Đ
S
I. Lí thuyết
1. Cú pháp khai báo biến và lệnh gán trong Pascal
Var : ;
:= ;
2. Cú pháp khai báo hằng trong Pascal
Const = ;
3. Lệnh nhập giá trị cho biến
Readln()
Hay read()
BÀI TẬP
II. Bài tập
Bài 1. Viết các biểu thức toán học sau đây dưới dạng
biểu thức trong Pascal.
a.
b.
a. 15*4 – (30 + 12)
b. (10+x)/(3+x) – x/(5+x)
c. (10+2)*(10+2)/3+1
d. ((10+a)*(10+a)-24)/(3+1)
Các biểu thức toán học được viết dưới dạng biểu thức trong Pascal.
BÀI TẬP
Program dudoan;
Uses crt;
Begin
Clrscr;
Writeln(‘15 + (8/2-3)*2 = ’, 15 + (8/2-3)*2:4:2);
Writeln(‘(7+5)*2 – 8/2 = ’, (7+5)*2 – 8/2:4:2);
Writeln(’15 mod 2 = ’,15 mod 2);
Writeln(15 div 2);
Readln;
End.
Bài 2. Dự đoán kết quả xuất ra màn hình của chương
trình sau.



15 + (8/2-3)*2 = 17.00
(7+5)*2 – 8/2 = 20.00
15 mod 2 = 1
7


BÀI TẬP
Bài 3. Hãy liệt kê các lỗi (nếu có) trong chương trình dưới đây và sửa lại cho đúng.
Program DT_hinh vuong;
Var a, S: Integer ;
Begin
clrscr;
writeln(‘nhap do dai canh hinh vuong:)
realn(A);
S:=a x a;
writeln(‘dien tich hinh vuong:’ S);
readln
End.
Program DT_hinh vuong;

Var a, S: Integer ;
Begin
clrscr;
writeln(‘nhap do dai canh hinh vuong:)
realn(A);
S:=a x a;
writeln(‘dien tich hinh vuong:’ S);
readln
End.
Program DT_hinh_vuong;
Uses crt;
Var a, S: Integer ;
Begin
clrscr;
writeln(‘nhap do dai canh hinh vuong:’);
readln(A);
S:=a * a;
writeln(‘dien tich hinh vuong : ’,S);
readln
End.
Bài 3.
Bài 4. Viết chương trình nhập hai số nguyên từ bàn
phím và hiển thị ra màn hình tổng và tích hai số đó.
Program Tinh_tong;
Uses crt;
Var a, b ,Tong, Tich : integer;
Begin
write (‘Nhap so thu nhat: ’); readln(a);
write (‘Nhap so thu hai: ’); readln(b);
Tong:= a+b; Tich:=a*b;
writeln (‘Tong cua hai so bang:’, Tong);
writeln (‘Tich cua hai so bang:’, Tich);
End.
Dặn dò
Học lí thuyết SGK
Xem lại các bài tập SGK
PROGRAM DUONG_TRON; {1}
VAR Chuvi, Dientich, r : real; {2}
CONST pi = 3.14; {3}
BEGIN {4}
Write (`Nhap ban kinh duong tron = `); readln (r); {5}
Chuvi := 2*r*pi; {6}
Dientich := r*r*pi; {7}
Writeln (`Chu vi duong tron co ban kinh`, r , `la :`, chuvi); {8} Writeln (`Dien tich duong tron ban kinh`, r, ` la:`, dientich); {9} Readln {10}
END. {11}
Bài 5. Giải thích từng dòng lệnh trong chương trình.