Kiểm tra tin 8 năm 1718

Bài 2 : Viết chương trình xét xem một tam giác có là tam giác vuông hay không khi biết ba cạnh của tam giác.. Bài 2: Viết chương trình xét xem một tam giác có là tam giác cân hay không

Trang 1

SỞ GD&ĐT BẮC GIANG

TRƯỜNG PT DTNT SƠN ĐỘNG KIỂM TRA 15 PHÚTMôn: Tin Lớp: 8

Năm học: 2017 – 2018 Ngày KT: 22/09/2017

ĐỀ BÀI Câu 1: Viết biểu thức toán dưới đây bằng kí hiệu trong Pascal.

Câu 2: Chuyển các biểu thức được viết trong Pascal sau đây thành các biểu thức toán:

c/ a*a/((2*b+c)*(2*b+c)) d 1+1/2+1/(2*3)+1/(3*4)+1/(4*5)

Câu 3: Viết biểu thức toán dưới đây bằng kí hiệu trong Pascal.

ĐÁP ÁN VÀ THANG ĐIỂM

1

a) a/b+c/d

b) a*x*x+b*x+c

c) 1/x-a/5*(b+2)

d) (a*a+b)*(1+c)*(1+c)*(1+c)

1 1 1 1

2

a) (a+b)2- b)

c)

d) 1+

1 1

3

a) 15-8>=3

b) (20-15)*(20-15) <>25

c) 11*11=121

d) X>10-3*x

0,5 0,5 0,5 0,5

Trang 2

SỞ GD&ĐT BẮC GIANG

Trường PT DTNT Sơn Động

KIỂM TRA 15 PHÚT Môn: Tin - Lớp: 8 Năm học: 2017 – 2018 Ngày: 24/11/2017

Đề 1

(Chọn 1 bài làm ra giấy) Bài 1: Viết chương trình in ra nhỏ nhất trong ba số được nhập từ bàn phím.

Bài 2 : Viết chương trình xét xem một tam giác có là tam giác vuông hay không khi biết ba cạnh của tam

giác

Đề 2

(Chọn 1 bài làm ra giấy)

Bài 1: Viết chương trình nhập vào 1 số bất kì Kiểm tra xem số vừa nhập là số chẵn hay số lẻ rồi thông

báo ra màn hình.

Bài 2: Viết chương trình xét xem một tam giác có là tam giác cân hay không khi biết ba cạnh của tam giác

và thông báo ra màn hình

Đề 3

(Chọn 1 bài làm ra giấy) Bài 1: Viết chương trình in ra số lớn nhất trong ba số nhập từ bàn phím.

Bài 2 : Viết chương trình xét xem một tam giác có là tam giác đều hay không khi biết ba cạnh của tam

giác

Đề 4

(Chọn 1 bài làm ra giấy) Bài 1: Viết chương trình nhập vào 1 số bất kì Kiểm tra xem số vừa nhập có chia hết cho 2 không rồi

thông báo ra màn hình.

Bài 2 : Viết chương trình xét xem một tam giác có là tam giác vuông hay không khi biết ba cạnh của tam

giác

ĐÁP ÁN

Trang 3

ĐỀ 1

Program Cau_1;

Uses crt;

Var x, y, z, min :real;

Begin

Write(‘Nhap x= ‘); Readln(x);

Write(‘Nhap y= ‘); Readln(y);

Write(‘Nhap z= ‘); Readln(z);

min:=x;

if(min>y) then min:=y;

if(min>z) then min:=z;

Writeln(‘So nho nhat la: ‘,min);

End.

Program Cau_2;

Uses crt;

Var a, b, c :real;

Begin Write(‘Nhap a= ‘); Readln(a);

Write(‘Nhap b= ‘); Readln(b);

Write(‘Nhap c= ‘); Readln(c);

if(a*a=b*b+c*c) or (b*b=c*c+a*a) or (c*c=b*b+a*a) then Writeln(‘La ba canh tam giac’) else

Writeln(‘khong la ba canh tam giac’) End.

ĐỀ 2

Program Cau_1;

Uses crt;

Var x :integer;

Begin

if(x mod 2 =0) then Writeln(‘La so chan’)

else writeln(‘La so le’);

End.

Program Cau_2;

Uses crt;

Var a, b, c :real;

if(a=b) or (b=c) or (c=a) then Writeln(‘La tam giac can’) else Writeln(‘khong la tam giac can’) End.

ĐỀ 3

Program Cau_1;

Uses crt;

Var x, y, z, max :real;

Begin

Write(‘Nhap y= ‘); Readln(y);

Write(‘Nhap z= ‘); Readln(z);

max:=x;

if(min<y) then min:=y;

if(min<z) then min:=z;

Writeln(‘So lon nhat la: ‘,max);

End.

Program Cau_2;

Uses crt;

Var a, b, c :real;

if(a=b) and (b=c) then Writeln(‘La tam giac deu’) else Writeln(‘khong la tam giac deu’) End.

ĐỀ 4

Program Cau_1;

Uses crt;

Var x :integer;

Begin

if(x mod 2 =0) then

Writeln(‘La so chia het cho 2’)

else writeln(‘La so khong chia het cho 2’);

End.

Program Cau_2;

Uses crt;

Var a, b, c :real;

if(a*a=b*b+c*c) or (b*b=c*c+a*a) or (c*c=b*b+a*a) then Writeln(‘La ba canh tam giac’) else

Writeln(‘khong la ba canh tam giac’)

Trang 4

Biểu điểm:

- Khai báo: 2 điểm

- Nhập dữ liệu từ bàn phím: 2 điểm

- Xét điều kiện: 4 điểm

- Xuất dữ liệu: 2 điểm

Trang 5

Trường PT DTNT Sơn Động

KIỂM TRA 15 PHÚT Môn: Tin - Lớp: 8 Năm học: 2017 – 2018 Ngày: 02/02/2018

ĐỀ 1 Câu 1: Hãy viết cấu trúc của 2 dạng câu lệnh lặp mà em đã học Cho ví

dụ (3đ)

Câu 2: Hãy điền vào chổ trống để được một chương trình đúng (3đ)

program tinh_tich;

var i: integer;

s: ………….;

begin s:= …… ;

for i:= 1 to 10 do

s:= s*1/i;

writeln ('tich ',…… );

readln;

end.

Câu 3: Hãy viết chương trình thực hiện tính tổng sau: (4đ)

S= 1+32+52+72+ +n2 với n là số lẻ được nhập từ bàn phím.

ĐÁP ÁN

Trang 6

Câu Nội dung Điểm

1

For <biến đếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>;

VD:

For <biến đếm>:=<giá trị cuối> downto <giá trị đầu> do <câu lệnh>;

VD:

1 0,5 1 0,5

3

Program Bai_3;

Uses crt;

Var i, n, s : integer;

Begin Write(‘Nhap so le n= ‘); Readln(n);

For i:=1 to n do

If i mod 2 <>0 then s:=s+i*i;

Writeln(‘Tong la: ‘,s);

Readln End.

0,5 0.5 1 1 1

Trường PT DTNT Sơn Động KIỂM TRA 15 PHÚT Môn: Tin - Lớp: 8

Năm học: 2017 – 2018 Ngày: 02/02/2018

ĐỀ 2

Câu 1: Viết cú pháp câu lệnh lặp For?

Câu 2: Giá trị của biến đếm phải như thế nào đối với giá trị đầu, giá trị cuối?

Câu 3: Trong lệnh lặp for …to … do của Pascal, trong mỗi vòng lặp, biến đếm thay

đổi như thế nào?

Câu 4: Lệnh sau đây lặp bao nhiêu lần? for i:= 2 to 7 do write(‘A’);

Câu 5: Trong câu lệnh lặp For i:=1 to 10 do begin … end câu lệnh ghép được thực

hiện bao nhiêu lần?

Câu 6: For là lệnh lặp với số lần biết trước, số vòng lặp là biết trước và được tính như thế nào?

Câu 7: Cho S và i là biến nguyên Khi chạy đoạn chương trình :

for i:=1 to 4 do s := s+i*2; writeln(s);

Trang 7

Điền các giá trị vào bảng sau (sau khi thực hiện chương trình)

Lần lặp thứ Giá trị của i Giá trị của S

ĐÁP ÁN

1 For <biến đếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>; 1

7

Giá trị của i Giá trị của S

1 1 1 1

Trang 8

TRƯỜNG PT DTNT SƠN ĐỘNG KIỂM TRA 45 PHÚTMụn: Tin Lớp: 8

Năm học: 2017 – 2018 Ngày KT: 20/10/2017

ĐỀ BÀI Bài 1 : Khoanh tròn chữ cái đứng trớc đáp án đúng trong các câu sau : (2đ)

Câu 1 : Máy tính có thể hiểu trực tiếp ngôn ngữ nào trong các ngôn ngữ dới đây

A Ngôn ngữ lập trình C Ngôn ngữ tự nhiên.

Câu 2 : Trong các tên sau đây tên nào là hợp lệ trong pascal?

Câu 3 : Dãy kí tự 100n2 thuộc kiểu dữ liệu ?

Câu 4 : Từ khoá để khai báo hằng trong ngôn ngữ lập trình Pascal là :

Câu 5 : Kết quả của phép tính nào đúng :

A 16 div 5 = 1 B 16 mod 5 = 1 C 16 div 4 = 3 D 16 mod 5 = 3

Câu 6 : A đợc khai báo biến với kiểu dữ liệu số nguyên, X là biến với kiểu dữ liệu xâu, phép gán hợp lệ là :

A A:= 4.5; B X:= ‘1234’; C X:= 57; D.A:=

‘LamDong’;

Câu 7 : Trong Pascal khai khai báo nào sau đây là đúng :

A Var hs : real;B Var 5hs : real; C Const hs : real; D Var S = 24;

Câu 8: Giả sử A đợc khai báo là biến kiểu số thực phép gán sau

có hợp lệ không?

A A:=4.98; B A:=’12445’ C A:=’hanoi’ D.

A=’678’

Bài 2 (2điểm): Nêu sự khác nhau giữa biến và hằng, cho ví dụ

về khai báo biến và hằng

Bài 3 (3 điểm)

a) Xác định kết quả của các biểu thức sau :

30-8< 7 ;

(20 - 9)2 = 121 ;

b) Hãy sửa lại lỗi nếu có của chơng trình sau

Program 3bai;

Trang 9

Var a,b := integer;

Const c := 3;

Begin

a := 200

b := a/c ; write (b);

readln End.

Bài 4 (3điểm) : Hãy viết chơng trình nhập vào 2 cạnh của

hình chữ nhật Sau đó tính chu vi và diện tích rồi hiển thị ra màn hình.

Đáp án Bài 1: (2 điểm) Mỗi câu đúng 0.25 điểm.

Bài 2(2điểm): Biến và hăng đều dùng để lu trữ dữ liệu và giá

trị của biến có thể thay đổi còn giá trị của hằng giữ nguyên trong suốt quá trình thực hiện chơng trình

VD var a:real; const c=10;

Bài 3: (3 điểm)

Câu a: Mỗi câu đúng 0.5 điểm.

30-8< 7 False (20 - 9)2 = 121 - True;

b

Program bai3;

Var a,b : real;

Const c = 3 ;

Begin

a := 200;

b := a/c ; write (b);

readln End.

Bài 4:(3 điểm)

program bai4;

var a,b:real;

Begin

Write(‘a=’); readln(a);

Write(‘b=’); readln(b);

writeln(‘chu vi hinh chu nhat=’,(a+b)*2:5:2);

writeln(‘ dien tich =’, a*b:5:2);

Trang 10

Readln; End.

Trang 11

TRƯỜNG PT DTNT SƠN ĐỘNG KIỂM TRA 45 PHÚTMôn: Tin Lớp: 8

Năm học: 2017 – 2018 Ngày KT: 14/12/2017

ĐỀ BÀI

Đề 1

1. Viết chương trình tính chu vi và diện tích hình chữ nhật Hai cạnh a và b được nhập từ bàn phím.

2. Viết chương trình nhập vào thời gian là x giây rồi đổi ra: Giờ, phút, giây.

Đề 2

1. Viết chương trình tính diện tích hình thang Hai đáy a, b và chiều cao h được nhập từ bàn phím.

2. Viết CT nhập vào một số nguyên rồi in ra kết quả trả lời số vừa nhập có chia hết cho 3 và 4 không.

Đề 3

1. Viết chương trình tính chu vi và diện tích tam giác vuông Hai cạnh góc vuông a và b được nhập từ bàn phím.

2. Viết chương trình nhập vào 1 số có 2 chữ số rồi tính tổng các chữ số trong

số đó VD: Nhập n=12  S=1+2=3.

ĐÁP ÁN VÀ HƯỚNG DẪN CHẤM

Viết đúng tên chương trình và khai báo thư viện 1

Chú ý: - Bài làm test dữ liệu đúng được 10 điểm.

- Bài làm test dữ liệu sai chấm theo hướng dẫn.

Trang 12

TRƯỜNG PTDTNT SƠN ĐỘNG

ĐỀ KIỂM TRA HỌC KÌ I NĂM HỌC 2017-2018

MÔN THI: Tin học - LỚP: 8 Thời gian làm bài: 45 phút Ngày thi: 29/12/2017

Họ và tên học sinh: Lớp:

Chọn

(Chú ý: Điền đáp án vào bảng trên)

Chọn câu trả lời đúng nhất điền vào bảng trên:

Câu 1: Chương trình dịch làm gì?

A Dịch từ ngôn ngữ máy sang ngôn ngữ tự nhiên

B Dịch từ ngôn ngữ lập trình sang ngôn ngữ tự nhiên

C Dịch từ ngôn ngữ máy sang ngôn ngữ lập trình

D Dịch từ ngôn ngữ lập trình sang ngôn ngữ máy

Câu 2: Đâu là các từ khoá trong ngôn ngữ lập trình Pascal?

A Program, then, mot, hai,ba

B Program, end, begin, Readln, lop82 C Program, end, begin D Lop82, uses, begin, end

Câu 3: Program là từ khoá dùng để:

A Khai báo tiêu đề chương trình

B Kết thúc chương trình C Viết ra màn hình các thông báoD Khai báo biến

Trang 13

Câu 4: Tên nào sai trong các tên sau?

Câu 5: Cấu trúc của chương trình Pascal gồm những phần nào?

A Khai báo

B Khai báo và thân C Tiêu đề, khai báo và thânD Thân

Câu 6: Phần nào trong chương trình Pascal bắt buộc phải có

Câu 7: Để thoát khỏi Pascal ta sử dụng tổ hợp phím:

Câu 8: Kết quả in ra màn hình của câu lệnh Writeln(‘5+20 = ‘, 20+5); là:

Câu 9: Phần nguyên trong phép chia của hai số nguyên 16 và 5 là:

Câu 10: Lênh khai báo t ̣ hư vi n ê trong ngôn ngữ l p trình Pascal là: â

Câu 11: Trong Pascal, khi gõ từ khóa cho biết điểm bắt đầu phần thân chương trình, ta có thể viết:

Câu 12: Trong Pascal, l nh clrscr được dùng để: ê

A Xóa màn hình

B In thông tin ra màn hình C Nh p dữ li u từ bàn phímD Tạm dừng chương trìnhâ ê

Câu 13: Từ khóa dùng để khai báo hằng trong ngôn ngữ lập trình Pascal là:

Câu 14: Để nhập dữ liệu ta dùng lệnh:

A Clrscr;

B Readln(x); C X:= ‘dulieu’;D Write(‘Nhap du lieu’);

Câu 15: Các câu lệnh Pascal sau đây câu nào đúng?

A if x:= 5 then a = b;

B if x > 4; then a:= b; C if x > 4 then a:=b; D if x > 4 then a:=b; else m:=n;

Câu 16: Trong chương trình Turbo Pascal, tổ hợp phím Alt + F9 dùng để:

A Dịch chương trình B Lưu chương trình

Trang 14

C Chạy chương trình D Khởi động chương trình

Câu 17: Để tìm giá trị lớn nhất của 2 số a, b thì ta viết:

A Max:=a; If b>Max then Max:=b;

B If (a>b) then Max:=a; If (b>a) then Max:=b; C Max:=b; If a>Max then Max:=a; D Cả 3 câu đều đúng

Câu 18: Biến a được nhận các giá trị là: 0; -1; 1; 2,3 Ta có thể khai báo a thuộc kiểu dữ liệu nào?

Câu 19: If Then Else là:

A Vòng lặp xác định

B Vòng lặp không xác định C Câu lệnh điều kiệnD Một khai báo

Câu 20: Kiểu dữ liệu Integer có giá trị lớn nhất là:

Câu 21: a là biến dữ liệu kiểu số nguyên Muốn xuất giá trị của a2 thì ta viết:

A Writeln('a*a'); B Readln(' a*a '); C Writeln(a*a); D Writwln(a2);

Câu 22: IF a>8 THEN b:=3 ELSE b:=5; Khi a nhận giá trị là 0 thì b nhận giá trị nào?

Câu 23: Khi soạn thảo xong chương trình Pascal, ta muốn lưu chương trình lại thì ta nhấn phím:

Câu 24: Khi một chương trình Pascal hết lỗi, ta muốn chạy chương trình thì nhấn phím:

Câu 25: Viết biểu thức toán a 3 -b 3 sang Pascal thì ta viết là:

Câu 26: Để 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:

Câu 27: Câu lệnh điều kiện dạng đầy đủ là:

A If <đk> then <câu lệnh 1> Else <câu lệnh 2>;

B If <đk> then < câu lệnh 1>,<câu lệnh 2>; C If <đk > then < câu lệnh>;D Cả A, B, C đều sai

Câu 28: Dãy kí tự 20n10 thuộc kiểu dữ liệu:

Câu 29: Từ khóa để khai báo biến trong ngôn ngữ lập trình Pascal là:

Trang 15

A Const B Var C Real D End

Câu 30: Phần dư trong phép chia của hai số nguyên 16 và 5 là:

Câu 31: A được khai báo là biến với kiểu dữ liệu số nguyên, X là biến với kiểu dữ liệu xâu Phép gán hợp lệ là:

Câu 32: Trong Pascal khai báo nào sau đây là đúng:

A Var hs : real; B Var 5hs : real; C Const hs : real; D Var S = 24;

Câu 33: Câu lệnh nào sau đây là khai báo hằng:

A Const n = 20; B Const n : 20; C Const n := 20; D Const n 20;

Câu 34: Câu lệnh nào sau đây là câu lệnh gán?

Câu 35: Câu lệnh nào sau đây dùng để nhập một số từ bàn phím vào biến x?

A Writeln(‘Nhap x = ’); B Write(x); C Writeln(x); D Readln(x);

Câu 36: Câu lệnh nào sau đây dùng để in giá trị lưu trong biến x ra màn hình?

A Writeln(x); B Write(x); C Write(x: 3); D Cả A, B, C đúng

Câu 37: Câu nào sau đây đúng khi nói về biến:

A Biến là đại lượng do người lập trình đặt

B Biến có giá trị không đổi trong suốt quá trình thực hiện chương trình

C Có một số biến có sẵn trong chương trình, không cần khai báo

D Tên biến phải bắt đầu bằng số

Câu 38: Số biến có thể khai báo tối đa trong một chương trình là bao nhiêu?

A Chỉ một biến cho mỗi kiểu dữ liệu

B 10 biến C Chỉ hạn chế bởi dung lượng bộ nhớD Không giới hạn

Câu 39: Biến được khai báo với kiểu dữ liệu số thực có thể lưu các giá trị nào trong các

giá trị dưới đây :

A Một số nguyên bất kì

B Một số thực bất kì

C Một số thực (có thể là số nguyên) trong phạm vi cho phép

Trang 16

D Một dãy các chữ và số

Câu 40: Chọn câu lệnh Pascal hợp lệ trong các câu sau :

A If x : = a + b then x : = x + 1;

B If a > b then max : = a ; else max : = b; C If 5 = 6 then x : = 100;D If a > b then max = a;

=========Hết=========

Trang 17

TRƯỜNG PTDTNT SƠN ĐỘNG

ĐÁP ÁN KIỂM TRA HỌC KÌ I NĂM HỌC 2017-2018

MÔN THI: Tin học - LỚP: 8 Thời gian làm bài: 45 phút Ngày thi: 29/12/2017

(Mỗi câu trả lời đúng được 0,25 điểm)

Định dạng
Số trang	17
Dung lượng	44,3 KB