Đáp án và biểu điểm: Câu 1: Viết đúng chơng trình cho 5đ Program cau_2; begin while S.
Trang 1PHềNG GD & ĐT TÁNH LINH KIỂM TRA 1 TIấT THỰC HÀNH
TRƯỜNG THCS ĐỨC PHÚ TIN HỌC 8 – NĂM HỌC: 2010-2011
Thời gian : 45’
I ĐỀ BÀI:
Cõu 1 (3 đ)::Viết chương trỡnh tớnh tổng sau: S=1+ 2 + 3 + + n sao cho tổng S nhỏ
nhất >550 (với n là số nguyờn được nhập vào từ bàn phớm)
Cõu 2 (4 đ): Viết chương trỡnh tớnh P= 1*2*3* *n (với n là số nguyờn được nhập
vào từ bàn phớm)
B/ Đáp án và biểu điểm:
Câu 1: Viết đúng chơng trình cho 5đ
Program cau_2;
begin
while S<=550 do
writeln('So n nho nhat de tong > 550 la ',n);
writeln('Tong dau tien > 550 la ',S); 1 đ Readln;
end.
Câu 2: Viết đúng chơng trình cho 5đ
program Tinh_tich;
var N,i:integer;
begin
write(‘Nhap so N = ‘);
for i:= 1 to N do 1 đ
writeln(‘Tich cua N so tu nhien dau tien P = ‘, P); 0.5 đ readln;
end