Câu 25 Đoạn lệnh sau đây
x:=1;
While x<=10 do
x:=x+1;
Khi nào thì kết thúc vòng lặp While .. do trên?
A. Khi x<10 B. Khi x = 10 C. Khi x <=10 D. Khi x>10
Câu 26: Trong ngôn ngữ Pascal, đoạn chương trình sau đưa ra màn hình kết quả gì?
For i:=1 to 5 do write (i:3);
A. 1 2 3 4 5 B. 5 4 3 2 1
C. Đưa ra i:3 D. Không đưa ra kết quả gì
Câu 27: Trong ngôn ngữ lập trình Pascal câu lệnh nào sau đây là đúng:
A. If a=5 then a:=d+1; else a:=d+2; B. If a=5 then a:=d+1 else a:=d;
C. If a:=5 then a=d+1; else a=d+2; D. If a<=5 then a:=d+1 else; a:=d+2;
Câu 28: Cho đoạn chương trình Pascal sau:
For i := 1 to 5 do
Begin
y := i;
End;
Sau khi thực hiện đoạn chương trình trên, giá trị của y là bao nhiêu?
A. 3 B. 4 C. 5 D. 6
Câu 29: Để tính tổng S=2 + 4 + 6 … + n; em chọn đoạn lệnh:
A. For i:=1 to n do if ( i mod 2)=0 then S:=S + i;
| B. For i:=1 to n do S:= S + i; |
C. c. For i:=1 to n do if ( i mod 2)=1 then S:=S + i; | D. for i:=1 to n do if ( i mod 2)<>0 then S:=S + i; |
Câu 30: Cho đoạn chương trình Pascal sau:
x:=3;
For i:=1 to 7 do x:= x+1;
Sau khi thực hiện câu lệnh For, giá trị của x là bao nhiêu?
A. 9 B. 7 C. 10 D. 3
Câu 31: Tìm giá trị của S trong đọan chương trình dưới đây:
S := 0;
For i := 1 to 5 do S := S + i;
A. S = 0 B. S = 1 C. S = 5 D. S = 15
Câu 14 (2,0 điểm): Trong các câu lệnh lặp trong Pascal sau đây đúng hay sai. Vì
sao?
a. While i<5 do i=i+1;
b. While 3=3 do i:=i+1;
c. While x<3 do x:=x+1;
d. For i:=2.5 to 10 do x:=x+1;
Cho biết giá trị của biến S và n sau khi thực hiện đoạn chương trình trên
Câu 15:
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 (nói cách khác, bao nhiêu vòng lặp được thực hiện?)
A.2 lần
B.Không lần nào
C.10 lần
D.1 lần
trong câu lệnh lặp
s:=1;
while S<3 do begin s:= s+1
câu lệnh lặp được thực hiện bao nhiêu lần(nói cách khác bao nhiêu vòng lặp được thực hiện?)
Câu 2: Đoạn chương trình
i:=0;
S:=0;
While S<5 do
Begin
i:=i+1;
S=S+i;
End;
Cho biết với đoạn lệnh trên chương trình thực hiện bao nhiêu vòng lặp và ý nghĩa câu lệnh lặp bằng cách điền vào chỗ trống bên dưới:
cho đoạn chương trình sau a:=1; while a<10 do write ( a); a:=a+1;
Đáp án của bạn:
ABCDCâu 02:
Câu lệnh nào sau đây viết đúngA. While a<b do a=a+1;B. White a<b do a:=a+1;C. While a< b do a:=a+1;D. while a< b do ; a:=a+1Đáp án của bạn:
ABCDCâu 03:
kq:=0; while 2*a< b do begin a:=2*a; kq:=kq+1; end;Đáp án của bạn:
ABCDCâu 04:
Đoạn chương trình nào sau không bị lỗiA. For i:=1 to n do x:=x+1B. For i=1 to n do x:=x+1;C. For i:=1 to n do x=x+1;D. For i:=1 to n do x:=x+1;Đáp án của bạn:
ABCDCâu 05:
với a:=5; b:=6 ; ta có while b> a do b:=b+1;A. lặp vô hạnB. 1000C. 1000000D. 7Đáp án của bạn:
ABCDCâu 06:
Đoạn lệnh sau cho kết quả x bao nhiêu. X:=0; for i:=1 to 5 do x:=x+i;A. 15B. 5C. 0D. 20Đáp án của bạn:
ABCDCâu 07:
Cú pháp câu lệnh lặp biết trướcA. For < biến đếm> : = < giá trị đầu> to < giá trị cuối> do;B. For < biến đếm> = < giá trị đầu> to < giá trị cuối> doC. For < biến đếm> ; = < giá trị đầu> to < giá trị cuối> doD. For < biến đếm> : = < giá trị đầu> to < giá trị cuối> doĐáp án của bạn:
ABCDCâu 08:
với d:=0; while d<n do begin d:=d+1; if d mod 10=0 then n:=n+3; end; wrtite(n); Với n=10 thì cho kết quả cuối cùng của n là bao nhiêu?A. 11B. 12C. 10D. 13
Đáp án của bạn:
ABCDCâu 09:
Cho đoạn chương trình a:=3; b:=2; while b< a do b:=b+1; kết quả của a,b sau khi kết thúc lặp làA. 3,4B. 3,3C. 2,3D. 3,2Đáp án của bạn:
ABCDCâu 10:
Cú pháp câu lệnh lặp chưa biết trướcA. While < điều kiện > doB. White < phép gán> do;C. While < điều kiện> do ;D. White < phép gán> doĐáp án của bạn:
ABCDCâu 11:
Cho đoạn chương trình a=3; b:=2; while b< a do b:=a; kết quả của a,b sau khi kết thúc lặp làA. 2,3B. 3,4C. 3,3D. 3,2Đáp án của bạn:
ABCDCâu 12:
Câu lệnh ghép là câu lệnh đặt giữa từ khóaA. begin;… end.B. Begin … end;C. Begin .. end.D. begin.. readln.Đáp án của bạn:
ABCDCâu 13:
Đoạn lệnh sau cho kết quả x bao nhiêu. X:=0; for i:=1 to 5 do x:=x+1;A. 15B. 5C. 20D. 0Đáp án của bạn:
ABCDCâu 14:
kq:=0; while 2*a< b do begin a:=2*a; kq:=kq+1; end;Đáp án của bạn:
ABCDCâu 15:
Đoạn chương trình nào sau không bị lỗiA. For i:=10 to 1 do x:=x+1;B. For i:=1 to 10 do x = x+1;C. for i:=1 to 10 do x:=x+1D. For i:=10 to 1 do x:=x+1Đáp án của bạn:
ABCDCâu 16:
Đoạn lệnh sau cho kết quả x bao nhiêu. X:=0; for i:=5 to 1 do x:=x+i;A. 5B. 20C. 15D. 0Đáp án của bạn:
ABCDCâu 17:
for i:=1 to n do if n mod 2 =0 then s:=s+i; với n =6 thì kết quả s là?A. 15B. 0C. 21D. 5Đáp án của bạn:
ABCDCâu 18:
cho đoạn chương trình sau a:=1; while a<10 do begin write ( a); a:=a+1; end;Đáp án của bạn:
ABCDCâu 19:
s:= 0; for i:=1 to n do if n mod 2 =0 then s:=s+i; với n =5 thì kết quả s là?A. 15B. 1C. 5D. 0Đáp án của bạn:
ABCDCâu 20:
Cho đoạn chương trình a:=3; b:=2; while b< a do begin b:=a; a:=b end; kết quả của a,b sau khi kết thúc lặp làA. 2,3B. 3,3C. 3,2D. 3,4For i:= 1 to 30do x:=x+3 ; y:=y-x ; a) Vòng lặp với số lần biết trước trên chạy bao nhiêu vòng ? b) Giá trị đầu là gì ? c) Giá trị cuối là gì ? d) Câu lệnh của câu lệnh lặp với số lần biết trước là gì ? e) Tính giá trị của biến x và y , nếu biết trước giá trị của x và y?
Hãy cho biết đoạn câu lệnh sau có bao nhiêu vòng lặp, khi kết thúc giá trị T là bao nhiêu T :=0 ; n :=0 While T < = 10 do Begin n := n+1; T := T+n; end;
Trong đoạn lệnh sau đây, chương trình đã thực hiện bao nhiêu vòng lặp?
x:=0; For i:=1 to 10 do x:=x+3;
