K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

1) Trong đoạn lệnh sau đây, chương trình đã thực hiện bao nhiêu vòng lặp?

S:=0; i:=0;

While S<=20 do

Begin

S:=S+i; i:=i+1;

end;

a) 2 b) 4 c) 8 d) vô hạn

2) 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 5 do x:=x+3;

a) 1 b) 3 c) 5 d) 15

3) Sau khi thực hiện đoạn chương trình sau, giá trị của biến x bằng bao nhiêu?

x:=0;

For i:=1 to 5 do x:=x+3;

a) 1 b) 3 c) 5 d) 15

4) Sau khi thực hiện đoạn chương trình sau, giá trị của biến S bằng bao nhiêu?

S:=0; i:=0;

While S<=20 do

Begin S:=S+i; i:=i+1; end;

a) 18 b) 21 c) 25 d) 52

5) Đoạn chương trình sau đây đã mắc phải lỗi gì?

a:=5;

While a<=6 do Writeln(‘A’);

a) Sử dụng sai cú pháp lệnh While ... do

b) Cho biết trước số lần lặp

c) Không cho biết trước số lần lặp

d) Lặp vô hạn

6) Trong ngôn ngữ lập trình Pascal, câu lệnh For ... do là lệnh:

a) Không cho biết trước số lần lặp

b) Cho biết trước số lần lặp

c) Biết trước hay không biết trước số lần lặp đều sử dụng được

d) Cả a, b, c đều sai

7) Trong ngôn ngữ lập trình Pascal, câu lệnh lặp được dùng để thể hiện:

a) Cấu trúc lặp c) Cấu trúc điều kiện

b) Cấu trúc rẽ nhánh d) Cấu trúc mảng

8) Trong ngôn ngữ lập trình Pascal, lệnh lặp với số lần chưa biết trước là câu lệnh:

a) For ... do c) If ... then ...

b) While ... do d) If ... then ... else...

9) Trong ngôn ngữ lập trình Pascal, câu lệnh nào sau đây hợp lệ?

a) For i:=10 to 1 do Writeln(‘A’);

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

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

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

10) Trong ngôn ngữ lập trình Pascal, câu lệnh nào sau đây hợp lệ?

a) x:=10; While x:=10 do x:=x+5;

b) x=10; While x=10 do x=x+5;

c) x:=10; While x=10 do x:=x+5;

d) x=10; While x:=10 do x=x+5;

0
Phần I. Trắc nghiệm. (5 điểm) 1. Nhặt thóc ra khỏi gạo cho đến khi trong gạo không còn lẫn thóc là hoạt động: a. Lặp 10 lần c. Lặp vô số lần (lặp vô hạn) b. Lặp với số lần chưa biết trước d. Lặp với số lần biết trước 2. Trong câu lệnh lặp For i:=1 to 10 do begin.... end bao nhiêu vòng lặp được thực hiện? a. Không lần nào b. 10 lần c. 1 lần d. 2 lần 3. Điều kiện kết thúc vòng lặp For... do của...
Đọc tiếp

Phần I. Trắc nghiệm. (5 điểm)
1. Nhặt thóc ra khỏi gạo cho đến khi trong gạo không còn lẫn thóc là hoạt động:
a. Lặp 10 lần c. Lặp vô số lần (lặp vô hạn)
b. Lặp với số lần chưa biết trước d. Lặp với số lần biết trước
2. Trong câu lệnh lặp For i:=1 to 10 do begin.... end bao nhiêu vòng lặp được thực hiện?
a. Không lần nào b. 10 lần c. 1 lần d. 2 lần
3. Điều kiện kết thúc vòng lặp For... do của Pascal là:
a. Biến đếm lớn hơn giá trị cuối c. Giá trị đầu bằng giá trị cuối
b. Biến đếm lớn hơn hoặc bằng giá trị cuối d. Giá trị đầu lớn hơn giá trị cuối
4. Trong các câu lệnh Pascal sau, câu lệnh nào hợp lệ?
a. For i:=1 to 10; do x=x+1; c. For i:=1 to 10 do x:=x+1;
b. For i:=10 to 1 do x:=x+1; d. For i:=1.5 to 10 do x:=x+1;
5. Trong lệnh lặp For... do của Pascal, sau từ khóa “do” nếu có từ 2 câu lệnh trở lên (câu lệnh
ghép) thì câu lệnh ghép đó phải đặt trong cặp từ khóa nào sau đây?
a. Begin.....readln; b. Begin.....and;
c. End.....Begin d. Begin.....end;
6. Câu lệnh sau đây cho kết quả như thế nào?
For i:=1 to 10 do Writeln(‘A’);
a. In dãy số từ 10 đến 1 ra màn hình c. In dãy số từ 1 đến 10 ra màn hình
b. In 20 ký tự A ra màn hình d. In 10 ký tự A ra màn hình
7. Sau khi thực hiện đoạn chương trình sau, giá trị của biến T bằng bao nhiêu?

i := 0; T := 0;
While i &lt; 3 do
begin T := T + 1; i := i + 1; end;

a. T = 2 b. T = 3 c. T = 4 d. T = 5
8. Cú pháp của câu lệnh lặp với số lần chưa biết trước trong Pascal:
a. While <câu lệnh> do <điều kiện>; c. While <điều kiện> do <câu lệnh>;
b. While <giá trị cuối > do <giá trị đầu>; d. While <giá trị đầu> do <giá trị cuối>;
9. Trong lệnh lặp While... do của Pascal, nếu điều kiện đúng thì:
a. Tiếp tục vòng lặp c. Vòng lặp vô tận
b. Lặp 10 lần d. Thoát khỏi vòng lặp
10. Trong các câu lệnh Pascal sau, câu lệnh nào hợp lệ?
a. x:=1; while x:= 10 do x:=x+5; c. x =1 while x>10 do x:=x+5;
b. x:=1; while x <10 do x:=x+5; d. x:=10; while x<10 do x=x+5;
Phần II. Bài tập. (5 điểm)
Câu 1: Cho đoạn chương trình sau: (2đ)

m:=2; k:=3;
For i:= 0 to 4 do begin

m:=m+1;
k :=k+m;
end;

Sau khi thực hiện đoạn chương trình trên giá trị của các biến m, k bằng bao nhiêu?
1. Câu 2: (3đ)Viết chương trình tính tổng: S= 1+ 1/2 + 1/3 + ….. + 1/N

(n là số nguyên được nhập từ bàn phím)

Làm giúp mình trước ngày 29/04/2020 nha !

1
27 tháng 4 2020

Cảm ơn ạ !haha

Phần II: Bài tập

Câu 1:

Sau khi thực hiện chương trình, chương trình sẽ báo lỗi thiếu begin

Câu 2:

uses crt;

var i,n:integer;

s:real;

begin

clrscr;

write('n='); readln(n);

s:=0;

for i:=1 to n do

s:=s+1/i;

writeln(s:4:2);

readln;

end.

1. Lặp với số lần chưa biết trước là lệnh gì? a. while..to..do b. for …to…do c. while …do d. if…then 2. “Nếu trời mưa thì em không đi chơi đá bóng”. Là câu lệnh gì? a. Câu lệnh lặp với số lần biết trước b. Câu lệnh lặp với số lần chưa biết trước c. Câu lệnh điều kiện d. Câu lệnh in ra màn hình 3. Hãy cho biết giá trị đầu của câu lệnh dưới đây: for i:=5 to 21 do writeln(i*2); a. 5 b. 6 c. 20 d....
Đọc tiếp

1. Lặp với số lần chưa biết trước là lệnh gì?

a. while..to..do

b. for …to…do

c. while …do

d. if…then

2. “Nếu trời mưa thì em không đi chơi đá bóng”. Là câu lệnh gì?

a. Câu lệnh lặp với số lần biết trước

b. Câu lệnh lặp với số lần chưa biết trước

c. Câu lệnh điều kiện

d. Câu lệnh in ra màn hình

3. Hãy cho biết giá trị đầu của câu lệnh dưới đây:

for i:=5 to 21 do writeln(i*2);

a. 5 b. 6 c. 20 d. 21

4. Hãy cho biết giá trị cuối của câu lệnh dưới đây: for i:=5 to 21 do writeln(i*2);

a. 5 b. 6 c. 20 d. 21

5. Hãy cho biết số vòng lặp của câu lệnh dưới đây: for i:=5 to 21 do writeln(i*2);

a. 15 b. 16 c. 17 d. 18

6. Câu lệnh GotoXY(3,5) có tác dụng gì?

a. Đưa con trỏ về cột 3, hàng 5

b. Đưa con trỏ về cột 5, hàng 3

7. Hãy cho biết đoạn lệnh sau đây thực hiện bao nhiêu vòng lặp?

S:=0;

While S>10 do writeln(s*s);

a. 0 b. 1 c. 9 d. 10

8. Hãy cho biết đoạn lệnh sau đây thực hiện bao nhiêu vòng lặp?

S:=3; N:=1

While S<=10 do

Begin

N:=N+1;

S:=S+N;

End;

a. 2 b. 3 c. 4 d. 5

II. Tự luận

Hãy cho biết đoạn lệnh sau đây in ra giá trị của S là bao nhiêu?

S:=3; N:=1

While S<=10 do

Begin

N:=N+1;

S:=S+N;

End;

Writeln(S);

1
10 tháng 5 2020

I Trắc Nghiệm

1.c.

2. c.

3.a.

4.d.

5. c.

6.a.

7.a.

8.b.

II Tự luận

in ra S= 12

Chúc bạn học tốt

ét o ét đê ;-;Câu 8: 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 9. Trong Câu lệnh lặp: For i := 1 to 15 do s:= s + 2*i. Khi kết thúc Câu lệnh lặp trên, Câu lệnh tính s được thực hiện bao nhiêu lần?A. 10 lần ;                           B. 15 lần;                                             C. 20 lần;            ...
Đọc tiếp

ét o ét đê ;-;
Câu 8:
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 9. Trong Câu lệnh lặp: For i := 1 to 15 do s:= s + 2*i. Khi kết thúc Câu lệnh lặp trên, Câu lệnh tính s được thực hiện bao nhiêu lần?

A. 10 lần ;                           B. 15 lần;                                             C. 20 lần;                             D. Không thực hiện.

Câu 10 : Trong câu lệnh lặp    for i :=1 to 20 do begin s:= s+i; end ;

câu lệnh gán được thực hiện bao nhiêu lần?

a) Không lần nào.                       b) 1 lần                       c) 2 lần                       d) 20 lần

Câu 11 : Trong câu lệnh lặp: For <Biến đếm>:=<Giá trị đầu> to <Giá trị cuối> do <câu lệnh>; Khi thực hiện ban đầu Biến đếm nhận giá trị = Giá trị đầu, sau mỗi vòng lặp biến đếm tăng thêm:

A. 1 đơn vị                 B. 2 đơn vị                 C. 3 đơn vị                 D. 4 đơn vị
 

Câu12: Khi nào thì câu lệnh lặp For…do (dạng tiến) kết thúc?

A. Khi biến đếm nhỏ hơn giá trị cuối.                B. Khi biến đếm bằng giá trị đầu.

C. Khi biến đếm bằng giá trị cuối.                      D. Khi biến đếm lớn hơn giá trị cuối.
Muốn sà vào lòng soái ca khóc 1 trận - Baozou Manhua meme - Meme Gấu trúc Trung Quốc | Meme Dump | Lục Lọi Meme | Cộng đồng meme trực tuyến

3
10 tháng 3 2022

sao ko ai ngó ngàng gì đến tui hết zậy ;-;

10 tháng 3 2022

hiha

TRẮC NGHIỆM: Câu 1:Vòng lặp sau thực hiện bao nhiêu lần lặp: For i := 1 to 5 do a := a + 1; A. 3 lần. B. 4 lần. C. 5 lần. D. 6 lần. Câu 2:Số lần lặp được tính như thế nào? A. Giá trị đầu–giá trị cuối B. Giá trị đầu–giá trị cuối + 1 C.Giátrịcuốigiátrịđầu . Giá trị cuối–giá trị đầu + 1 Câu 3:Trong câu lệnh lặp, kiểu dữ liệu của biến đếm là: A. Real B. String C.Integer D. Char Câu 4:Câu lệnh lặp...
Đọc tiếp
TRẮC NGHIỆM: Câu 1:Vòng lặp sau thực hiện bao nhiêu lần lặp: For i := 1 to 5 do a := a + 1; A. 3 lần. B. 4 lần. C. 5 lần. D. 6 lần. Câu 2:Số lần lặp được tính như thế nào? A. Giá trị đầu–giá trị cuối B. Giá trị đầu–giá trị cuối + 1 C.Giátrịcuốigiátrịđầu . Giá trị cuối–giá trị đầu + 1 Câu 3:Trong câu lệnh lặp, kiểu dữ liệu của biến đếm là: A. Real B. String C.Integer D. Char Câu 4:Câu lệnh lặp với số lần chưa biết trước bắt đầu bằng từ khóa: A. For B.While C. If D. Var Câu 5:Vòng lặp sau cho kết quả bằng bao nhiêu: i := 0; T := 0; While i < 3 do begin T := T + 1; i := i + 1; end; A. T = 2 B. T = 3 C. T = 4 D. T = 5 Câu 6:Khai báo biến kiểu mảng nào sau đây là hợp lệ: A. Var A, B: array[1..50] of integer; B. Var A, B: array[1..N] of real; C. Var A: array[100..1] of integer; D. Var B: array[1.5..10.5] of real; Câu 7:Cú pháp câu lệnh lặp với số lần chưa biết trước: A. For ... to... do B. For <biến đếm>:=<giá trị cuối> to <giá trị đầu> do <câu lệnh>; C. For ... do D. For <biến đếm>:=<giá trị đầu > to <giá trị cuối > do <câu lệnh>; Câu 8:Chọn câu lệnh đúng: A. x:=1; while x:= 10 do x:=x+5; B. x:=1; while x> 10 do x:=x+5; C. x:=1; while x<10 do x:=x+5; D. x:=10; while x< 10 do x=x+5; Câu 9:Trong câu lệnh For ... do, sau từ khóa “Do” có hai câu lệnh trở lên ta “gói” chúng trong: A. Begin...readln; B. Begin...and; C. End...Begin D. Begin... end; Câu 10:Cho biết ý nghĩa của câu lệnh sau: For i:=1 to 10 do Readln(a[i]); A. In dãy số trong mảng a B. Nhập dãy số cho mảng a C. Nhập giá trị cho biến i D. In giá trị cho biến i Câu 11:Các câu lệnh sau, câu lệnh nào hợp lệ ? A. For i:=1 to 10 do; write (‘a’) B. For i:=1 to 10 do write (‘a’); C.var x:real; begin for x:=1 to 10 do write (‘a’); end. Câu 12: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á tị của biến J bằng bao nhiêu? A. 12 B. 22 C. 15 D. 42 Giúp mình nha! Cần gấp!
0
1, Cho s và i là biến nguyên. Khi chạy đoạn chương trình: s:=0;for i:=1 to 3 do s := s+3*i; s:=s+5;writeln(s); Kết quả in lên màn hình là? * A.12 B. 10 C.23 D. 26 2, Kêt quả của câu lệnh For i:=1 to 20 do if i mod 3=2 then write(i:3); * A.In ra các số lẻ từ 1 đến 20; B. In ra các số chẵn từ 1 đến 20; C. In ra các số chia hết cho 3 từ 1 đến 20; D. In ra các số chia hết cho 3 dư 2 từ 1 đến 20; 3, Trong...
Đọc tiếp
1, Cho s và i là biến nguyên. Khi chạy đoạn chương trình: s:=0;for i:=1 to 3 do s := s+3*i; s:=s+5;writeln(s); Kết quả in lên màn hình là? * A.12 B. 10 C.23 D. 26

2, Kêt quả của câu lệnh For i:=1 to 20 do if i mod 3=2 then write(i:3); *

A.In ra các số lẻ từ 1 đến 20; B. In ra các số chẵn từ 1 đến 20; C. In ra các số chia hết cho 3 từ 1 đến 20; D. In ra các số chia hết cho 3 dư 2 từ 1 đến 20;

3, Trong câu lệnh lặp For i:=3 to 15 do s:=s+i; Có bao nhiêu vòng lặp? *

A. 15; B. 12; C. 13 D. 3;

4, Cho k,m,n nhận giá trị tương ứng 4,5,6; kết thúc câu lệnh sau:X:=n; If ((x mod 2=0)) or (x<=5) then x:=m*k else x:=m div k; thì x có giá trị là ? *

A. 1 B. 0 C. 5. D. 20 5, Cho biết đoạn chương trình Pascal sau đây chương trình thực hiện bao nhiêu vòng lặp?s:=0; n:=0; while s<=5 do n:= n+1;s:= s+n; * A. 3 B. 6 C. 10 D. kết quả khác 6, Cho a,b,c lần lượt nhận giá trị 10,30,20 . Hỏi sau đoạn chương trình Begin X:=a; If x>a then x:=a; if x>b then x:=b;if x>c then x:=c;end; x có giá trị là? * A. 20 B. 10 C. 30 D. Cả ba đáp án đều sai. 7, Cho x:=7; kết thúc câu lệnh If ((x mod 3=0)) and (x<=8) then x:=x+10; thì x có giá trị là ? * A. 8 B. 10 C. 17 D. 7 8, Cho s và i là biến nguyên. Khi chạy đoạn chương trình s := 1; for i:=1 to 5 do s := s+i; Kết quả in lên màn hình là của s là ? * A. 15 B. 16 C. 11 D. 22 9, Cho biết đoạn chương trình Pascal sau đây, khi kết thúc giá trị của S bằng bao nhiêu? S:=0; n:=0;while S<=3 do begin n:= n+1;S:= s+n; end; * A. 15 B. 10 C. 6 D. 3
1
10 tháng 12 2020

1. C

2. D

3. C

4. D

5. D

6. B

7. D

8. B

9. C

 

26 tháng 2 2022

Sai

a: S=35

b: S=62

c: S=32

Câu 13.Dưới đây là một đoạn chương trình Pascal: for i:=0 to 10 do begin s:=s+1; end; Sau khi thược hiện đoạn chương trình trên, giá trị của i là: A. 0 B. 10 C. 11 D. Không xác định. Câu 14.Trong câu lệnh lặp For i :=1 to 10 do begin s :=s+i 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) ? Không lần nào. 1 lần. 2 lần. 10 lần. Câu 15. Lệnh...
Đọc tiếp

Câu 13.Dưới đây là một đoạn chương trình Pascal:

for i:=0 to 10 do

begin

s:=s+1;

end;

Sau khi thược hiện đoạn chương trình trên, giá trị của i là:

A. 0

B. 10

C. 11

D. Không xác định.

Câu 14.Trong câu lệnh lặp

For i :=1 to 10 do begin s :=s+i 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) ?

Không lần nào.

1 lần.

2 lần.

10 lần.

Câu 15. 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. For < biến đếm > :=<giá trị cuối> to <giá trị đầu> do <câu lệnh>;

D. For < biến đếm > : <giá trị đầu> to <câu lệnh> do <giá trị cuối>;

Câu 16. Câu lệnh Pascal nào sau đây là hợp lệ?

A. For i:=1 to 10 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:=100 to 1 do writeln(‘A’);

Câu 17. Vòng lặp for..to...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 18. Viết 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 được khai báo là kiểu dữ liệu:

A. Integer

B. Char

C. String

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

Câu 19. Trong câu lệnh lặp for ….downto…do, sau mỗi lần thực hiện câu lệnh, biến đếm bị:

A. Giảm đi 3 đơn vị

B. Giảm đi 2 đơn vị

C. Giảm đi 1 đơn vị

D. Giảm đi 4 đơn vị

Câu 20. Đối với đoạn chương trình Pascal sau đây:

a:=2; b:=3;

for i:=1 to 5 do

if i mod 2=0 then a:=a+1;

b:=b+a;

cach :=‘ ‘;

writeln(a,cach,b);

- Cho biết lệnh writeln in ra màn hình giá trị a và b là bao nhiêu?

A. a=2; b=3

B. a=3; b=4

C. a=4; b=6

D. a=4; b=7

1
10 tháng 4 2020

Câu 13: B

Câu 14: 10 lần

Câu 15: B

Câu 16: A

Câu 17: A

Câu 18: A

Câu 19: C

Câu 20:D