Sau đú tớch lại vào phiếu trả lời Câu 1: Pascal sử dụng câu lệnh nào sau đây để lặp với số lần lặp biết trớc?. while...do Câu 2: Pascal sử dụng câu lệnh nào sau đây để lặp với số lần lặp[r]
Trang 1Trường THCS Tử Đà
Họ và tờn:……… Kiểm tra 1 tiết ( HKII)
Phiếu trả lời
Đỏp ỏn
Đỏp ỏn
ĐỀ BÀI
(Hãy khoanh tròn đáp án đúng nhất Sau đú tớch lại vào phiếu trả lời)
Câu 1: Pascal sử dụng câu lệnh nào sau đây để lặp với số lần lặp biết trớc ?
A if then B if then else C for to do D while do
Câu 2: Pascal sử dụng câu lệnh nào sau đây để lặp với số lần lặp cha biết trớc ?
A if then B if then else C for to do D while do
Cõu 3: Cõu lệnh if đầy đủ cú dạng đỳng là?
Trang 2A If :=<Điều kiện> then < Cõu lệnh 1> else<Cõu lệnh 2>;
B If =<Điều kiện> then < Cõu lệnh 1> else<Cõu lệnh 2>;
C If <Điều kiện> then < Cõu lệnh 1> else<Cõu lệnh 2>;
D If <Điều kiện> then < Cõu lệnh 1>; else<Cõu lệnh 2>;
Câu 4: Lệnh lặp nào sau đây là đúng :
A For <biến đếm> = <giá trị đầu> to <giá trị cuối> do <câu lệnh>;
B For <biến đếm> := <giá trị đầu> to <giá trị cuối> do <câu lệnh>;
C While <điều kiện> = do <câu lệnh>;
D While <điều kiện> := do <câu lệnh>;
Câu 5: Để tăng biến nhớ lờn 1 đơn vị, ta thực hiện lệnh:
Câu 6: Câu lệnh Pascal : While (3*5>=15) do Writeln (3*5); sẽ :
A In số 15 ra màn hình 3 lần B In số 15 ra màn hình 5 lần
C Không thực hiện lệnh Writeln (3*5); D Lặp vô hạn lần lệnh Writeln (3*5);
Câu 7: ý nghĩa của lệnh clrscr;
A Khai báo sử dụng th viện chuẩn trong chơng trình C Xóa màn hình
Cõu 8: Lệnh nào sau đõy in ra màn hỡnh số lớn nhất giữa A và B :
A If A > B then write(B) else write(A);
B If A > B then write(A) else write(B);
C If A > B then Readln(A) else Readln(B);
D If A < B then writeln(A) else writeln(B);
Cõu 9: Cho N là biến kiểu nguyờn, chọn cõu đỳng cỳ phỏp :
A If N < 10 then write (' Nho hon 10 ') ; else write (' Lon hon 10 ');
B If N < 10 Write (' Nho hon 10 ') else then write (' Lon hon 10 ');
C If N < 10 then write (' Nho hon 10 ') else write (' Lon hon 10 ');
D If N < 10 then N := 10 else N > 20 then write (' N > 20 ');
Cõu 10: Kiểm tra nếu ba số a, b, c đều lớn hơn 1 thỡ in số 1, chọn lệnh nào :
A if (a > 1) and ( b > 1) and ( c > 1) then write(1);
B if (a > 1) or (b > 1) or (c > 1) then write(1);
Trang 3C if a > 1 and b > 1 and c > 1 then write(1);
D if a, b , c đều > 1 then write(1);
Câu 11: Trong Pascal, câu lệnh nào sau đây là đúng?
A S:=1; while s<10 do S:=S+i; i:=i+1; B i:=0; S:=1;While S<10 do write(S);
C n:=2; while n<5 do write(‘A’); D Cả A và B
Câu 12 Trong câu lệnh lặp: For i := 1 to 10 do j:= j + 2; write( j );
Khi kết thúc câu lệnh lặp trên, câu lệnh write( j ); đợc thực hiện bao nhiêu lần?
Cõu 13 Trong Pascal, cõu lệnh nào sau đõy được viết đỳng?
A for i:= 4 to 1 do writeln(‘A’); B for i= 1 to 10 writeln(‘A’);
C for i:= 1 to 10 do writeln(‘A’); D for i to 10 do writeln(‘A’);
Cõu 14 Cho đoạn chương trỡnh: J:= 0;
For i:= 1 to 5 do J:= j + i;
Sau khi thực hiện đoạn chương trỡnh trờn, giỏ trị của biến j bằng bao nhiờu?
Cõu 15 Khi thực hiện đoạn chương trỡnh sau: n:=1; T:=50;
While n<20 do
begin
n:=n+5; T:=T - n end;
Hóy cho biết giỏ trị của biến T bằng bao nhiờu?
Cõu 16: Cõu lệnh lặp while…do cú dạng đỳng là:
A While <điều kiện> do <cõu lệnh>; B While <điều kiện> <cõu lệnh> do;
C While <cõu lệnh> do <điều kiện>; D While <điều kiện>, do <cõu lệnh>;
Cõu 17: Chương trỡnh Pascal sau sẽ in ra màn hỡnh nội dung gỡ?
Var i: integer;
Begin For i:=1 to 10 do writeln(‘Day la lan lap thu’ ,i);
Readln;
Trang 4A 1 câu “Day la lan lap thu i ” B 1 câu “Day la lan lap thu’, i ”
C 10 câu “Day la lan lap thu’ , i ”
D 10 câu "Day la lan lap thu i ” theo thứ tự của i là từ 110
Câu 18: Cho S và i biến kiểu nguyên Khi chạy đoạn chương trình :
S:= 0; i:= 1;
while i <= 6 do begin S:= S + i; i:= i + 2; end;
Giá trị sau cùng của S là :
Câu 19: Giảsử các khai báo biến đều hợp lệ Ðể tính S = 10 em chọn câu nào :
A S := 1; i := 1;
while i<= 10 do S := S *
i;
i := i + 1;
B S := 1; i := 1;
while i<= 10 do i := i + 1;
S := S * i;
C S := 0; i := 1;
while i<= 10 do
begin
S := S * i;
i := i + 1;
end;
D S := 1; i := 1;
while i<= 10 do begin
S := S * i;
i := i + 1;
end;
Câu 20: Cho S = 1 2 + 2 2 + + 100 2 Nhóm lệnh nào tính sai Giá trị của S:
A S:=0; FOR i:=1 TO 100 DO S := S + i*i;
B S:=0; FOR i:=1 TO 100 DO S := S + SQR(i);
C S:=0; FOR i:=100 DOWNTO 1 DO S := S + i*i;
D S:=1; FOR i:=1 TO 100 DO S := S + i*i;