Quá trình!. bài toán trên máy tính theo trình 4 các 8m sau:A... Bài 3: Program GPTBN; var a, b: Real; Begin Write ‘ Nhap he so a, b cua phuong trinh:’; Readln a,b; if a0 then writeln ‘p
Trang 1ĐỀ CƯƠNG ÔN TẬP MÔN TIN HỌC 8
Hoc kì I – Năm học: 2015 – 2016
A.PHẦN TRẮC NGHIỆM:
Hãy khoanh tròn vào câu trả lời mà em cho là đúng nhất.
1 Sau khi
2 Integer là / $01
3 Cách 2 +bx+c nào sau ; là <!
4
C Xâu ký 4 2 525 ký 4 D Xâu ký 4 2 255 ký 4
5 Div là phép toán gì?
6
A Không con "N :2! H dòng P theo
B Q con "N :2! H dòng P theo
C
D
7 Trong Pascal, khai báo nào sau ; là <!
A Const x:real; B Var 4hs: Integer C Var Tb : real; D Var R=30;
8 Trong
9 Câu
A
B
C
D I ` sai
10
A Nháy
B Nháy
C Nháy
D Nháy
11 Dãy kí
13
18 4
4
6 1
8 i trong Pascal là?
A (18-4)/(6+1-4) B 18-4/6+1-4 C (18 - 4)/(6+1)-4 D (18-4)/6+1-4
14
A Begin -> Program -> End B Program -> End -> Begin
C End -> Program -> Begin D Program -> Begin -> End
15 Biu th9c toán hhc (a2 + b)(1 + c)3c biu diin trong Pascal nh thP nào ?
A (a*a + b)(1+c)(1 + c)(1 + c) B (a.a + b)(1 + c)(1 + c)(1 + c)
C (a*a + b)*(1 + c)*(1 + c)*(1 + c) D (a2 + b)(1 + c)3
16: Trong Pascal, vmi câu l0nh nh sau: Writeln (‘KQ là:’, a); cái gì sq in ra màn hình?
17: Ngôn !/ $s trình là
Trang 218 Quá trình ! bài toán trên máy tính theo trình 4 các 8m sau:
A Xác
B Mô
C Xác
D
19 IJ khóa CONST dùng khai báo :
20 Câu
21 Trong khi
a IJ A suy ra B b Gán giá " A cho B c IJ B suy ra A b Gán giá " B cho A
22 Trong khi
a I}! giá " i lên AC và gán $ cho i
b
c i là
d I ` sai
23 Xác
a
24 Tính
a Input là ! k 2 n, output là n cho "m b Input là n, output là tính !
c Input là n cho "m output là ! k 2 n d Input là tính ! output là n
25
26
a If <Câu
b If
c If <Câu
d If
27 Cho
a:= 3; b:=5;
if a<b then c:=a+b;
28
a If a>b then Write(a); b If a>b then Writeln(a);
c ) a và b ` <! d ) a và b ` sai
29
30
B PHẦN BÀI TẬP
Câu 1:
2
b
2 2
2
) 2 ( ) 1
k
2
1 1
1 1
n n
2 )
Trang 3Bài 2:
h
Program dien_tich_tam_giac;
Var a, h : interger;
S : real;
Begin
Write(‘Nhap canh day h=’); Readln (h);
Write(‘Nhap do dai canh a=’); Readln (a);
S:=(a*h)/2;
Writeln(‘ Dien tich hinh tam giac la S=’,S:5:3);
readln;
End
Bài 3:
Program GPTBN;
var a, b: Real;
Begin
Write (‘ Nhap he so a, b cua phuong trinh:’); Readln (a,b);
if a<>0 then writeln (‘phuong trinh co nghiem duy nhat x=’, -b/a)
else if b=0 then writeln (‘Phuongtrinh co vo so nghiem’)
else writeln (‘phuong trinh vo nghiem’);
Readln;
End
Bài 4:
Program tim_max;
Var a, b: interger;
Begin
Writeln(‘nhap a=’); readln(a);
Writeln(‘nhap b=’); readln(b);
If a > b then writeln(‘so lon nhat la:’, a:3)
else writeln(‘so lon nhat la:’, b:3);
Readln End
... : interger;S : real;
Begin
Write(‘Nhap canh day h=’); Readln (h);< /i>
Write(‘Nhap dai canh a=’); Readln (a);< /i>
S:=(a*h)/2;< /i>
Writeln(‘...
Writeln(‘ Dien tich hinh tam giac la S=’,S:5:3);< /i>
readln;< /i>
End
B? ?i 3:
Program GPTBN;
var a, b: Real;
Begin
Write (‘ Nhap he... phuong trinh:’); Readln (a,b);
if a<>0 then writeln (‘phuong trinh co nghiem nhat x=’, -b/a)
else if b=0 then writeln (‘Phuongtrinh co vo so nghiem’)
else writeln (‘phuong