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.

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

14 tháng 5 2021

C

Chọn C

30 tháng 5 2022

C, F?

31 tháng 5 2022

C

1.Em hiểu câu lệnh lặp nào trong pascal theo nghĩa nào sau đây ? A.câu lệnh lặp là câu lệnh được sử dụng để chỉ thị cho máy tính thực hiện cấu trúc lặp B.Một câu lệnh lặp có thể thay cho nhiều câu lệnh khác nhau C.câu lệnh lặp chỉ là tên của 1 loại câu lệnh trong pascal D.cả A,B và C đều sai 2.Trong câu lệnh lặp for<biến đếm>:=<giá trị đầu>to<giá trị cuối>do<câu lệnh>; thì biến đếm thuộc kiểu dữ...
Đọc tiếp

1.Em hiểu câu lệnh lặp nào trong pascal theo nghĩa nào sau đây ?
A.câu lệnh lặp là câu lệnh được sử dụng để chỉ thị cho máy tính thực hiện cấu trúc lặp
B.Một câu lệnh lặp có thể thay cho nhiều câu lệnh khác nhau
C.câu lệnh lặp chỉ là tên của 1 loại câu lệnh trong pascal
D.cả A,B và C đều sai
2.Trong câu lệnh lặp for<biến đếm>:=<giá trị đầu>to<giá trị cuối>do<câu lệnh>; thì biến đếm thuộc kiểu dữ liệu gì?
A.kiểu kí tự.
B.kiểu số thực
C.kiểu số nguyên
D.kiểu số thực hoặc số nguyên

3.Trong câu lệnh For i:=1 to 20 do write (‘*’); số vòng lặp là:
A.1. B.19. C.20. D.21
4.câu lệnh nào dùng để in ra màn hình sau ‘Pascal’?
A.for i:=1 to 10 do writeln (‘Pascal’)
B. for i:=1 to 10 writeln (‘Pascal’)
C. for i:=1 to 10 do writeln (‘Pascal’); for i:=1 to 10 do writeln (Pascal);
5.câu lệnh nào dùng để in ra màn hình các số lẻ từ 1 đến 10?
A. for i:=1 to 10 do writeln (‘i’);
B. for i:=1 to 10 do writeln (i);
C. for i:=1 to 10 writeln (‘i’);
D. for i:=10 to 1do writeln (‘i’);

mấy bẹn xinh trai,gái đẹp giúp hộ mình nhe😇

1

Câu 1: D

Câu 2: A hoặc C

Câu 3: C

Câu 4: C

Câu 5: Sai hết

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

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

8 tháng 4 2022

 D. 10 lần

9 tháng 4 2022

A.11 lần

Cách tính số lần lặp : <giá trị cuối> - <giá trị đầu> + 1 = 10 - 0 + 1 = 11 lần