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.

a: Sai bởi chỉ số đầu lớn hơn chỉ số cuối

b: Sai vì chỉ số đầu, chỉ số cuối là số thực

c: Sai vì chỗ end thiếu chấm phẩy

d: Sai vì chỉ số đầu lớn hơn chỉ số cuối

e: Sai vì chỉ số đầu và chỉ số cuối là số thực

d: Đúng

30 tháng 4 2022

cảm ơn bạn nhayeu

 

4 tháng 5 2023

a) Đúng. Vòng lặp for được sử dụng để lặp lại việc xuất chuỗi 'A' từ i=150 đến i=1.

b) Sai. Vòng lặp for yêu cầu chỉ sử dụng các giá trị nguyên, không phải là các giá trị số thực => không thể sử dụng i làm biến đếm trong vòng lặp này. (bạn có thể sử dụng một biến số nguyên khác để đếm số lần lặp lại, hoặc sử dụng vòng lặp while)

c) Sai. Câu lệnh While cần có một điều kiện để kiểm tra, trong khi trong câu lệnh này không có điều kiện nào để kiểm tra. Nếu không có điều kiện để kiểm tra, vòng lặp sẽ lặp vô hạn và không bao giờ dừng lại.

25 tháng 4 2022

Câu lệnh đúng, không có lỗi.

A. Phần trắc nghiệm: Hãy chọn một đáp án đúng nhất Câu 1. 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 2. 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?A. 10 lần B. 5 lần C. 1 lần              D. Không...
Đọc tiếp

A. Phần trắc nghiệm: Hãy chọn một đáp án đúng nhất 

Câu 1. 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 2. 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?

A. 10 lần B. 5 lần C. 1 lần              D. Không thực hiện.

Câu 3. 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?

A. 12    B. 22 C. 15 D. 42.

Câu 4. Trong Pascal, câu lệnh nào sau đây là đúng?

A. S:=1;  B. i:=0; S:=1;

While S<10 do write(S);                 while s<10 do S:=S+i; i:=i+1;  

C. n:=2; while n<5 do write(‘A’); D. Cả A và B.

Câu 5. 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?

A. 14 B. 15 C. 16 D. 17

Câu 6. Khai báo biến mảng: A : array[1..7] of real;. Sử dụng câu lệnh For i:= 1 to 5 do readln(A[i]);  để gán giá trị cho các phần tử trong biến A từ bàn phím, ta sẽ nhập được bao nhiêu giá trị? 

A. 4 B. 5 C. 6 D. 7

Câu 7. Trong câu lệnh khai báo biến mảng, phát biểu nào sau đây đúng:

A. Chỉ số đầu và chỉ số cuối là 2 số nguyên. B. Chỉ số đầu   chỉ số cuối.

C. Kiểu dữ liệu có thể là integer hoặc real.               D. Cả ba ý trên.

Câu 8. Giả sử biến mảng A có 5 phần tử và giá trị của các phần tử lần lượt là 1, 4, 7, 2, 6. Khi thực hiện câu lệnh sau: tb:= 0; For i:= 1 to 5 do tb := tb + A[i]; Giá trị của biến tb là bao nhiêu?

A. 20 B. 18 C. 21 D. 22

1

Câu 1: B
Câu 2: A

Câu 3: C

Câu 4: B

Câu 5: D

Câu 6: B

Câu 7: A

Câu 8: C

a.for i:=1 to 10;do x:=x+1;

-> lệnh sai vì sau "to 10" không có dấu ';' 

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

Sửa lại:for i:=1 to 10 do x:=x+1;

b.for i:=10 to 1 do x:=x+1;

-> lệnh sai vì for i:=10 to 1 giá trị đầu phải nhỏ hơn giá trị cuối(10>1) nên  không lặp được.

Sửa for i:=1 to 10 do x:=x+1;

c.while i:=1 do t=10;

-> lệnh sai phép gán giá trị cho biến VD: x:=1

t=10(sai) thiếu dấu ':'  

Sửa lại:

while i:=1 do t:=10;

d.while a<=b;do write('b lon hon a');

-> lệnh sai vì Sau While a<=b không có ';'(While <điều kiện> do <câu lệnh>) 

Sửa lại:

while a<=b do write('b lon hon a');

 

A. TRẮC NGHIỆM: (2 điểm)   Hãy khoanh tròn ý đúng nhất.Câu 1:Trong ngôn ngữ Pascal, về mặt cú pháp câu lệnh nào sau đây đúng với cấu trúc lặp For ..to..doA. 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 2:Trong câu lệnh lặp for i:=1 to 22 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...
Đọc tiếp

A. TRẮC NGHIỆM: (2 điểm)   Hãy khoanh tròn ý đúng nhất.

Câu 1:Trong ngôn ngữ Pascal, về mặt cú pháp câu lệnh nào sau đây đúng với cấu trúc lặp For ..to..do

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 2:Trong câu lệnh lặp for i:=1 to 22 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. Không lần nào           B. 22 lầnC. 20 lần  D. 30 lần

Câu 3:Khi thực hiện đoạn chương trình sau:  n:=100; T:=10;

  While T>20 do begin T:=T – 10; n:=n+5; end;

Hãy cho biết giá trị của biến n  bằng bao nhiêu?

A. 10                    B. 100                       C. 16                         D. 15

Câu 4:Đoạn chương trình này thực hiện bao nhiêu vòng lặp

S:=0;A:=2;while A<5 do S:=S+A;

A. 1 vòng lặp                                                                     B. Lặp vô hạn

C. 25 vòng lặp        D. Không có vòng lặp nào

Câu 5:Hãy phân biệt câu lệnh trong chương trình trên đúng hay sai và đánh dấu “x” vào ô ở cột tương ứng trong bảng dưới đây?

Câu

Đúng

Sai

a. While a<=b do writeln (‘A’);

 

 

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

 

 

c. Var X: array[1..10] of integer;

 

 

d. Var X: array[15..8] of integer;

 

 

 

6
14 tháng 5 2021

1. C

14 tháng 5 2021

còn mà lm típ đi

A. TRẮC NGHIỆM: (2 điểm)   Hãy khoanh tròn ý đúng nhất.Câu 1:Trong ngôn ngữ Pascal, về mặt cú pháp câu lệnh nào sau đây đúng với cấu trúc lặp For ..to..doA. 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 2:Trong câu lệnh lặp for i:=1 to 22 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...
Đọc tiếp

A. TRẮC NGHIỆM: (2 điểm)   Hãy khoanh tròn ý đúng nhất.

Câu 1:Trong ngôn ngữ Pascal, về mặt cú pháp câu lệnh nào sau đây đúng với cấu trúc lặp For ..to..do

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 2:Trong câu lệnh lặp for i:=1 to 22 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. Không lần nào           B. 22 lầnC. 20 lần  D. 30 lần

Câu 3:Khi thực hiện đoạn chương trình sau:  n:=100; T:=10;

  While T>20 do begin T:=T – 10; n:=n+5; end;

Hãy cho biết giá trị của biến n  bằng bao nhiêu?

A. 10                    B. 100                       C. 16                         D. 15

Câu 4:Đoạn chương trình này thực hiện bao nhiêu vòng lặp

S:=0;A:=2;while A<5 do S:=S+A;

A. 1 vòng lặp                                                                     B. Lặp vô hạn

C. 25 vòng lặp        D. Không có vòng lặp nào

Câu 5:Hãy phân biệt câu lệnh trong chương trình trên đúng hay sai và đánh dấu “x” vào ô ở cột tương ứng trong bảng dưới đây?

Câu

Đúng

Sai

a. While a<=b do writeln (‘A’);

 

 

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

 

 

c. Var X: array[1..10] of integer;

 

 

d. Var X: array[15..8] of integer;

 

 

 

B. TỰ LUẬN: (8,0 điểm) 

Câu 1: Hãy điền đúng , sai (đánh dấu x) và sửa chương trình sau: (3điểm)

Viết chương trình tính H và tìm n biết H=  và H >1.85

 

 

 

Câu lệnh

Đ

S

 Sửa lỗi

Use_Crt;

 

 

 

Var I, n,H :interge;

 

 

 

Begin;

 

 

 

H:=1; n:=0;

 

 

 

     clrscr;

 

 

 

while H<= 1.85 do

 

 

 

begin n:=n+2;

 

 

 

if n mod 2 =1 then H:= H+1/n;

 

 

 

End.

 

 

 

writeln('so can tim la ,n,’tong la:,H);

 

 

 

readln

end;

 

 

 

Câu 2: (5 điểm)

a) Hãy mô tả thuật toán chương trình nhập n số nguyên từ bàn phím. Đếm xem có bao nhiêu số chẵn và tính tổng của các số chẵn. Biết N cũng được nhập từ bàn phím

b)Viết chương trình nhập dãy  số nguyên từ bàn phím. Đếm xem có bao nhiêu số chẵn và tính tổng của các số chẵn. Biết N cũng được nhập từ bàn phím

Ai giúp mk với

7

Câu 1: C

Câu 2: B

A. TRẮC NGHIỆM: (2 điểm)   Hãy khoanh tròn ý đúng nhất.Câu 1:Trong ngôn ngữ Pascal, về mặt cú pháp câu lệnh nào sau đây đúng với cấu trúc lặp For ..to..doA. 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 2:Trong câu lệnh lặp for i:=1 to 22 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...
Đọc tiếp

A. TRẮC NGHIỆM: (2 điểm)   Hãy khoanh tròn ý đúng nhất.

Câu 1:Trong ngôn ngữ Pascal, về mặt cú pháp câu lệnh nào sau đây đúng với cấu trúc lặp For ..to..do

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 2:Trong câu lệnh lặp for i:=1 to 22 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. Không lần nào           B. 22 lầnC. 20 lần  D. 30 lần

Câu 3:Khi thực hiện đoạn chương trình sau:  n:=100; T:=10;

  While T>20 do begin T:=T – 10; n:=n+5; end;

Hãy cho biết giá trị của biến n  bằng bao nhiêu?

A. 10                    B. 100                       C. 16                         D. 15

Câu 4:Đoạn chương trình này thực hiện bao nhiêu vòng lặp

S:=0;A:=2;while A<5 do S:=S+A;

A. 1 vòng lặp                                                                     B. Lặp vô hạn

C. 25 vòng lặp        D. Không có vòng lặp nào

Câu 5:Hãy phân biệt câu lệnh trong chương trình trên đúng hay sai và đánh dấu “x” vào ô ở cột tương ứng trong bảng dưới đây?

Câu

Đúng

Sai

a. While a<=b do writeln (‘A’);

 

 

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

 

 

c. Var X: array[1..10] of integer;

 

 

d. Var X: array[15..8] of integer;

 

 

 

1
9 tháng 5 2021

1c

2b

3b

4b

5 SAI

SAI

ĐÚNG

SAI

24 tháng 2 2022

a) Không hợp lệ

Sửa: for i:=50 downto 10 do writeln('A');

b) Không hợp lệ

Sửa: for i:=1 to 5 do writeln('A');

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

a: Sai

Sửa lại: For i:=1 to 5 do writeln('A');

b: Sai

For i:=1 to 5 do writeln('A');

c: Sai 

x:=5;

while x>=5 do

x:=x+5;

d: var x:array[1..10]of integer;