Câu 15. Trong câu lệnh lặp for i:=2 to 100 do begin  end; câu lệnh ghép được thực hiện bao nhiêu lần (hay bao nhiêu vòng lặp được thực hiện)?

A. 102             B. 101                         C. 100             D. 99

Câu 16. Xem ví dụ sau trong pascal:

Uses crt; Var i:integer;       

Begin

            Clrscr; I:=1; while i < 14 do begin Writeln(‘0’); i := i+1; End; Readln; End.

Ví dụ trên ghi ra màn hình bao nhiêu chữ số 0?

A. 14;              B. 13;              C. 15;                          D. 16;

Câu 17. điều kiện trong câu lệnh lặp với số lần chưa biết trước thường là :

A. Phép gán    B. Câu lệnh đơn          C. Câu lệnh ghép        D. Phép so sánh

Câu 18. câu lệnh lặp For i:=1 to 5 do Writeln(‘Day la lan lap thu ‘,i); sẽ in ra màn hình 5 dòng chữ trong đó dòng thứ 3 có nội dung là:

A. Day la lan lap thu i                         B. Day la lan lap thu, i

C. Day la lan lap thu 3                        D. Day la lan lap thu , 3

Câu 1: Câu lệnh pascal nào sau đây là hợp lệ?

a) For i:=100 to 1 do writeln(‘A’);

b) For i:=1.5 to 10.5 do writeln(‘A’);

c) For i= 1 to 10 do writeln(‘A’);

d) For i:= 1 to 10 do writeln(‘A’);

Câu 2: Lệnh lặp For, mỗi lần lặp giá trị của biến đếm thay đổi như thế nào?

A. Tăng 1

B. Tăng 2

C. Tăng 3

D. Tăng 4

Câu 4: Vòng lặp for ..do là vòng lặp:

A. Biết trước số lần lặp

B. Chưa biết trước số lần lặp

C. Biết trước số lần lặp nhưng giới hạn là <=50

D. Biết trước số lần lặp nhưng giới hạn là >=50

Câu 5: Với ngôn ngữ lập trình Pascal câu lệnh lặp for i:=1 to 10 do x:=x+1;

thì biến đếm i phải được khai báo là kiểu dữ liệu: *

A. Integer

B. Real

C. String

D. Tất cả các kiểu trên đều được

Câu 6: Cho S và i là biến nguyên. Khi chạy đoạn chương trình :

s:=0;

for i:=1 to 5 do

s := s+i;

writeln(s);

Kết quả in lên màn hình là của s là :

a) 11

b) 55

c) 101

d) 15

Câu 7: Để tính tổng S=1+3 + 5 + … + n; em chọn đoạn lệnh:

a) for i:=1 to n do

if ( i mod 2)=0 then S:=S + 1/i; c) for i:=1 to n do if ( i mod 2) < > 0 then S:=S + i;

b) for i:=1 to n do

if ( i mod 2)=0 then S:=S + i

Else S:= S + i; d) for i:=1 to n do if ( i mod 2)=0 then S:=S + i;

Câu 8: Để đếm có bao nhiêu số lẻ nhỏ hơn hay bằng n ; em chọn đoạn lệnh:

a) for i:=1 to n do

if ( i mod 2)< >0 then S:=S + 1; c) for i:=1 to n do if ( i mod 2) =0 then S:=S + 1;

b) for i:=1 to n do

if ( i mod 2)=0 then S:=S + i ; d) for i:=1 to n do if ( i mod 2)=0 then S:=S + i;

III. Bài tập thực hành: Viết chương trình nhập vào 1 số nguyên n. Viết ra 20 các số chẳn tiếp theo lớn hơn số n.

GIÚP VỚI !!!

Câu 1: Cho 1 vài ví dụ về hoạt động lặp đi lặp lại trong cuộc sống?

Câu 2: Các câu lệnh lặp đúng hay sai? Nếu sai sửa lại cho đúng?

a) For i:=10 to 1 do write('a');

b) For i:=1 to 10 do write('a');

c) For i:=1 to 10 do write('a'); write('b');

Bài 3: For i:=1 to n do readln(a); lặp mấy lần?

Bài 4: Cho đoạn chương trình sau: S:=0; For i:= 1 to 5 do S:=S+i;

           Hỏi sau khi kết thúc chương trình thì S bằng bao nhiêu?

Bài 5: Viết chương trình tính tổng của 10 số tự nhiên đầu tiên.

   Làm nhanh nhanh giúp em nha mấy anh mấy chị. Cảm ơn trước nha.  :))