- Cấu trúc lặp được sử dụng trong thuật toán để mô tả một hay một nhóm công việc được lặp đi lặp lại nhiều lần. - Cấu trúc lặp được chia làm 2 dạng lặp với số lần biết trước và lặ[r]
(1)PHỊNG GD&ĐT HƯỚNG HỐ TRƯỜNG THCS LAO BẢO
KIỂM TRA HỌC KỲ II MÔN: TIN HỌC, Lớp 8
(Thời gian 45 phút) ĐỀ:
Câu 1: (2 điểm) Cấu trúc lặp có vai trị ngơn ngữ lập trình? Có loại cấu trúc lặp? Hãy viết cú pháp câu lệnh lặp ngôn ngữ pascal? Câu 2: (3 điểm) Hãy cho biết số lần lặp, bước lặp, kết hình gì, từ cho biết đoạn chương trình trên?:
function try(n,m:integer):integer; var r:integer ;
Begin
r := n mod m; Whilr r<> Begin
n:=m; m:=r; r:= n mod m; End;
Try:=m; End; Begin
Writeln(Try(30,48)); Readln; End
(2)PHÒNG GD&ĐT HƯỚNG HOÁ TRƯỜNG THCS LAO
BẢO
HƯỚNG DẪN CHẤM MÔN: TIN HỌC, Lớp 8
(Thời gian 45 phút)
STT Nội dung Điểm
Câu
- Cấu trúc lặp sử dụng thuật toán để mơ tả hay nhóm cơng việc lặp lặp lại nhiều lần
- Cấu trúc lặp chia làm dạng lặp với số lần biết trước lặp với số lần chưa biết trước - Cú pháp: lặp với số lần biết trước
For <biến>:=gtđầu to gtcuối
<Công việc>;
(trong <biến> thuộc kiểu nguyên)
- Cú pháp: lặp với số lần trước
While <điều kiện> <công việc>
0,5 0,5 0,5
0,5
Câu Số lần lặp n m r
30 48 30
48 30 18
30 18 12
18 12
12
Kết hình 6: chương trình tìm UCNL số n m
0,5 0,5 0,5 0,5 0,5 0,5
Câu Program hooc_ner;
Var a:array[0 50] of real; T,N,i:integer; P,x:real;
Begin
Writeln(‘ Nhập vào giá trị n=’); readln(n);
(3)Writeln(‘ Nhập vào giá trị x=’); readln(x);
For i:=0 to n do Begin
Writeln(‘ nhập giá trị a[‘,i,’]=’); readln(a[i]); End;
P:=0; t:=1;
For i:=n downto do begin
P:=t*p*x+a[i]; t:=-t; End;
Writeln(‘ kết là’,p:4:4); Readln;
End
1,0
2,0