kiểm tra 1 tiết tin 11-lần 1

KIỂM TRA 1 TIẾT
MÔN: TIN HỌC 11
Đề:
C1:Nêu quy tắc đặt tên trong ngôn ngữ lập trình Pascal? Đặt 3 tên đúng
quy tắc?
C2: Chuyển các biểu thức toán học sau đây sang dạng ngôn ngữ lập trình
A)
yx
yx
+
+
22
B)2sinxcosx-sin
2
x C) (1+x-y)
xy
yx
2
1
22
++
C3: Viết chương trình giải phương trình bậc nhất ax+b=0;
ĐÁP ÁN VÀ BIỂU ĐIỂM CHẤM
C1( 3đ)
- Quy tắc đặt tên trong ngôn ngữ lập trình pascal: Tên là 1 dãy liên tiếp
không quá 127 kí tự, bao gồm chữ số, chữ cái và dấu gạch dưới và bắt đầu
bằng chữ cái hoặc dấu gạch dưới.
(1.5đ)
- đặt 3 tên đúng quy tắc( mỗi tên đúng 0.5 đ)
Max; a; nghiem;
C2 (3đ - Chuyển đúng mỗi biểu thức: 1đ)

A) sqrt(x*x+y*y)/abs(x+y)
B) 2*sin(x)*cos(x)-sqr(sin(x))
C) (1+x-y)*((sqr(x)+sqr(y)+1)/(2*x*y))
C3 (4đ)
Program giaiptb1;
Uses crt;
Var a,b,x:real; (0.5d)
Begin
Write(‘nhap a,b:’); readln(a,b); (0.5d)
If (a=0) and (b<>0) then write(‘pt vo nghiem’); (1d)
If (a=0) and (b=0) then write(‘pt vo so nghiem’); (1d)
If (a<>0) then Begin X:=b/a;
Write(nghiem x=’,x); (1d)
End;
Readln;
End.