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. 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

Chương trình sẽ in ra nội dung sau:

1

2

3

4

5

6

7

8

9

10

Câu 13 :  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 to 10 do writeln(‘A’);

C. For i:=5 to 30 do; writeln(‘A’)

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

17 tháng 3 2022

D

17 tháng 3 2022
12 tháng 5 2021

Hãy cho bt đâu là lệnh lặp for...do để in chữ O

A for i:=1.5 to 10.5 do writeln('o');

B for i:=1 to 10 do writeln('O');

C for i:=100 to 1 do writeln('o')

D for i:=1 to 10 do; writeln('o')

Chọn B

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 1B. Tăng 2C. Tăng 3D. Tăng 4Câu 4: Vòng lặp for ..do là vòng lặp:A. Biết trước số lần lặpB. Chưa biết trước số lần lặpC. Biết trước số lần lặp nhưng...
Đọc tiếp

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 !!!

2
2 tháng 3 2021

1.C

2.A

4.A

5.A

6.D

7.C

8.A

III.

Program HOC24;

var  n,d: integer;

begin

write('Nhap N: '); readln(n);

if n mod 2=1 then

begin

begin

n:=n+1;

write(n,' ');

end;

d:=1;

while d<20 do 

begin

n:=n+2;

write(n,' ');

d:=d+1;

end;

end else

begin

d:=1;

while d<=20 do 

begin

n:=n+2;

write(n,' ');

d:=d+1;

end;

end;

readln

end.

Câu 1: Chọn C

Câu 2: Chọn A