De thi tin 8 KHII (co dap an)

ĐIỂM
LỜI PHÊ



I/ Hãy khoanh tròn chữ cái đứng trước câu trả lời đúng nhất (6d)

Câu 1. Ta thực hiện các lệnh gán sau : x:=1; y:=9; z:=x+y; Kết quả thu được của biến z là:
a. 1 b. 9 c. 10 d. Một kết quả khác

Câu 2. Để thực hiện phép tính tổng của hai số nguyên a và b ta thực hiện như sau :
a. Tong=a+b; b. Tong:=a+b; c. Tong:a+b; d. Tong(a+b);

Câu 3. Trong Pascal, phím F2 có ý nghĩa là:
a. Chạy chương trình b. Lưu chương trình c. Dịch chương trình d. Mở bài mới

Câu 4. Trong Pascal, phím Ctrl + F9 có ý nghĩa là:
a. Chạy chương trình b. Lưu chương trình c. Dịch chương trình d. Mở bài mới

Câu 5. Để nhập một giá trị vào phần tử a[3] của mảng a thì ta viết là:
a. Readln(a) b. Readln(a[3]) c. Readln(a[i]) d. Readln(a(3))

Câu 6. Khai báo mảng a có 11 phần tử từ 5 đến 15 là các số nguyên thì ta khai báo như sau:
a. a:Array [1..11] of integer; b. a:Array [5...15] of integer;
c. a:Array [5..15] of integer; d. a:Array [11] of integer;

Câu 7. Xuất dữ liệu từ mảng a có 11 phần tử từ 5 đến 15 thì ta viết lệnh như sau:
a. Writeln(a); b. Writeln (a[11]);
c. For i: =5 to 15 do Writeln (a[i]); d. Writeln (a[i]);

Câu 8. Khi ta viết các câu lệnh: a:=0;t:=a+b;a:=2;b:=3;t:=4 Khi đó t có giá trị là:
a. 0 b. 5 c. a+b d. 4

Câu 9. Viết biểu thức a[3] * b[6] trong Pascal cho ta kết quả là:
a. 3*6=18 b. Giá trị a[3] nhân với giá trị b[6]
c. Biến a nhân với biến b d. Mảng a nhân với mảng b
Câu 10. Khi ta khai báo st : STRING ; thì st có thể nhận dữ liệu là :
a. Các kí tự số b. Các kí tự chữ cái
c. Các kí tự đặc biệt d. Tất cả đều đúng

Câu 11. Ta có st := ‘THCS TT Loc Ninh’ ; khi ta viết lệnh WRITELN(st[3]) thì trên màn hình xuất hiện :
a. st[3] b. THCS TT loc Ninh c. C d. THC

Câu 12. Các cách đặt tên sau, cách nào đúng:
a. bai thi b. baithi c. Bàithi d. Bài thi

II. Các câu lệnh Pascal sau đây có hợp lệ không? Vì sao? (1 điểm)
a) if a>b then max:=a; else max:=b;
b) if a>b then max:=a else max:=b;
c) for i:=1 to 10 for j:=1 to 10 do x:=x+1;
d) for i:=1 to 10 do for i:=1 to 10 do x:=x+1;

III. Hãy viết lại chương trình đúng từ chương trình có lỗi sau: (2 điểm)

Program bang cuu chuong;
var N,i:integer;
begin
clrscr;
write(`Nhap so N=`); readln(N);
writeln;
writeln(`Bang nhan `,N);
writeln;
for i:=10 to 1 do;
begin
GotoXY(5,WhereY);
writeln(N,` x `,i:2,` = `,N*i:3);
end;
readln
end.

IV. Hãy viết chương trình để giải quyết các bài toán sau : (1đ)

Tính giá trị biểu thức 11 + 22 + 32 + ….+ n2, với n là số nguyên dương được nhập từ bàn