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.

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;

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

I Trắc Nghiệm 1) 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 A)16 B)15 C)14 D)17 2) Trong câu lệnh khai báo mảng, phát biểu nào sau đây đúng? A) Cả 3 ý trên B) Chỉ số đầu và số cuối là 2 số nguyên C) Kiểu dữ liệu có integer D) Chỉ số đầu và chỉ số cuối 3) Khai báo biến mảng A: array [1...7] of real; for i= 1 to 5 do; Readln (A[i]) để gắn giá...
Đọc tiếp

I Trắc Nghiệm

1) 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

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

2) Trong câu lệnh khai báo mảng, phát biểu nào sau đây đúng?

A) Cả 3 ý trên

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

C) Kiểu dữ liệu có integer

D) Chỉ số đầu và chỉ số cuối

3) Khai báo biến mảng A: array [1...7] of real; 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ận được bao nhiêu giá trị

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

4) Trong câu lệnh lặp for i=1 to do J:=J+2 writeln (J); khi kết thúc câu lệnh trên, câu lệnh writeln (J) được thực hiện bao nhiêu lần

A) Không thực hiện C) 10 lần

B) 1 lần D) 5 lần

5) Trong pascal, câu lệnh nào sau đây là đúng?

A) for i:= 1 to 10 do writeln (`A');

B) for i:= 4 to 10 do writeln(`A');

C) for i to 10 do writeln (`A')

D)for i:= 1 to 10 do writeln (`A')

6) Trong pascal, câu lệnh nào sau đây đúng?

A) n:=2, while n<5 do writeln (`A')

B) i:=0; 5:=1; while S<10 do writeln (S);

while S<10 do S:= S+i; i=i+1;

C) S:=1,

D) Cả A và B đúng

7) Giả sử biến A có 5 phần tử và giá trị 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ị trung bình là bao nhiêu?

A)18 C)21

B)21 D)22

8) Cho đoạn chương trình J:=0; for i:= 1 to S sau khi thực hiện chương trình trên giá trị của biến i bằng bao nhiêu?

A)12 C)42

B)22 D)15

II Tự Luận

1) Viết cú pháp câu lệnh lặp với số lần chưa biết trước. Nêu hoạt động của câu lệnh

2) Viết chương trình nhập điểm kiểm tra học kì môn tin cho N học sinh và in ra màn hình với N và điểm kiểm tra được nhập từ bàn phím ( Sử sụng biến mảng).

3
27 tháng 6 2020

Câu 2.

Program HOC24;

var i,n: integer;

a: array[1..32000] of integer;

begin

write('Nhap so ban lam bai thi hoc ki tin : '); readln(n);

for i:=1 to n do

begin

write('Nhap diem kiem tra hoc ki Tin cua ban thu ',i,' :'); readln(a[i]);

end;

writeln(n);

for i:=1 to n do write(a[i],' ');

readln

end.

27 tháng 6 2020

Câu 1.

* Cú pháp : while <điều kiện> do <câu lệnh>;

* Hoạt động :

- Bước 1: Kiểm tra điều kiện lặp:

+ Nếu điều kiện lặp sai thì thoát khỏi vòng lặp, chuyển sang lệnh tiếp theo.

+ Nếu điều kiện lặp đúng thì chuyển sang bước 2.

- Bước 2: Thực hiện khối các lệnh lặp.

- Bước 3: Quay lại bước 1.

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

 

Số vòng lặp là 20-5+1=15+1=16(vòng)

Câu 1: S = 10

Câu 2: Chữ "xin chao" được in ra màn hình 3 lần

Câu 3:

- For...to...do:

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

+ Điều kiện kết thúc vòng lặp là một số xác định.

- While...do:

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

+ Điều kiện để kết thúc vòng lặp thường là một phép so sánh.

30 tháng 3 2019

Lời giải :

a) Không hợp lệ . Sửa : for i:= 1 to 100 do writeln('A');

b) Không hợp lệ . Sửa : for i:= 1 to 10 do write('A');

c) Không hợp lệ . Sửa: X:=10; while X=10 do X:=X+5;

d) tương tự câu c