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.

I. 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...
Đọc tiếp

I. 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: Cú pháp của câu lệnh điều kiện dạng đủ nào sau đây là đúng?
A. If <điều kiện> then <câu lệnh 1> else <câu lệnh 2> B. If <câu lệnh> then <điều kiện>
C. If <điều kiện> then <câu lệnh 1> else <câu lệnh 2> D. If &lt;điều kiện&gt; do &lt;câu lệnh&gt;;
Câu 5: Chương trình sau cho kết quả gì?
Program VD;
Var a, b: Real; x: Integer;
Begin
Readln( a,b);
If a>b then x:=a else x:=b;
Writeln(x);
End.
A.Xuất ra màn hình số nhỏ nhất trong 2 số a, b đã nhập.
B.Xuất ra màn hình số lớn nhất trong hai số a, b đã nhập.
C.Chương trình không thực hiện được do lỗi khai báo kiểu dữ liệu.
D.Đảo giá trị của hai biến a, b cho nhau.
Câu 6: Hoạt động nào sau đây lặp với số lần lặp biết trước?
A. Rửa rau tới khi sạch B. Học bài cho tới khi thuộc bài
C. Gọi điện tới khi có người nghe máy D. Ngày tắm 2 lần
Câu 7: Cấu trúc câu lệnh điều kiện dạng thiếu là:
A. If <điều kiện> then <câu lệnh 1> esle <câu lệnh 2> B. If <điều kiện> then <câu lệnh >
C. If <điều kiện> then <câu lệnh 1> <câu lệnh 2> D. If <điều kiện> then <câu lệnh 1> esle <câu lệnh 2>
Câu 8: Ta có 2 lệnh sau:
x := 8;
IF x > 5 then x := x+1;
Giá trị của x nhận được là bao nhiêu?
A. 5 B. 7 C. 8 D. 9
Câu 9: Chọn câu lệnh Pascal hợp lệ trong các câu lệnh sau:
A. If a > b then max = a ; B. If a := b then max = b ;
C. If a = b then S := a+b ; D. If a <> b then b=a;
Câu 10: Chọn cú pháp đúng nhất về câu lệnh lặp:
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ị cuối > to < giá trị đầu > do <câu lệnh >

C. for <biến đếm > : = < giá trị đầu > to < giá trị cuối > do < câu lệnh >
D. for < biến đếm > : = < giá trị đầu > to < giá trị cuối > do < câu lệnh >
Câu 11: Em hiểu lệnh lặp theo nghĩa nào dưới đây?
A. Một lệnh thay cho nhiều lệnh B. Các câu lệnh được viết lặp đi lặp lại nhiều lần
C. Vì câu lệnh có tên là lệnh lặp D. Cả (A), (B), (C) đều sai
Câu 12: Khi nào thì câu lệnh For..to..do kết thúc?
A. Khi biến đếm nhỏ hơn giá trị cuối B. Khi biến đếm lớn hơn giá trị cuối
C. Khi biến đếm nhỏ hơn giá trị đầu D. Khi biến đếm lớn hơn giá trị đầu

Câu 13: Cho các câu lệnh sau hãy chỉ ra câu lệnh đúng?
A. for i:=1 to 10; do x:=x+1; B. for i:=1 to 10 do x:=x+1;
C. for i:=10 to 1 do x:=x+1; D. for i =10 to 1 do x:=x+1;
Câu 14: Với ngôn ngữ lập trình Passcal 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 nào?
A. Integer B. Real C. String D. Tất cả các kiểu trên đều được
Câu 15: Trong câu lệnh lặp với số lần biết trước (For – do), được thực hiện mấy lần?
A. ( < giá trị cuối > - < giá trị đầu >) lần B. Tuỳ thuộc vào bài toán mới biết được số lần
C. Khoảng 10 lần D. ( < giá trị đầu > - < giá trị cuối>) lần
Câu 16: Xác định số vòng lặp cho bài toán: tính tổng các số nguyên từ 1 đến 100
A. 1 B. 100 C. 99 D. Tất cả đều sai
Câu 17: Kết quả của &lt; điều kiện &gt; trong câu lệnh sẽ có giá trị là gì?
A. Là một số nguyên B. Là một số thực C. Đúng hoặc sai D. Là một dãy kí tự
Câu 18: Sau khi thực hiện đoạn chương trình sau:
S:=0; For i:=1 to 5 do S:=S+i; Giá trị của biến S bằng bao nhiêu?
A. 20 B. 15 C. 10 D. 0
Câu 19: Cú pháp lệnh lặp For – do dạng lùi:
A. for < biến đếm> = < Giá trị cuối >downto < Giá trị đầu > do < câu lệnh >
B. for < biến đếm> := < Giá trị cuối >downto < Giá trị đầu > do < câu lệnh >
C. for < biến đếm> = < Giá trị cuối >down < Giá trị đầu > do < câu lệnh >
D. for < biến đếm> := < Giá trị đầu >downto < Giá trị cuối > do < câu lệnh >
Câu 20: Trong lệnh lặp For – do: (chọn phương án đúng nhất)
A. Giá trị đầu phải nhỏ hơn giá trị cuối
B. Giá trị đầu phải nhỏ hơn hoặc bằng giá trị cuối
C. Giá trị đầu phải lớn hơn giá trị cuối D. Giá trị đầu phải bằng giá trị cuối
Câu 21: Lệnh lặp For – do được sử dụng khi:
A. Lặp với số lần biết trước B. Lặp với số lần chưa biết trước
C. Lặp với số lần có thể biết trước D. Lặp với số lần không bao giờ biết trước
Câu 22: Sau khi thực hiện đoạn chương trình sau: s:=1; for i:= 1 to 3 do s:= s*i;
Giá trị của biến s bằng bao nhiêu?
A. 10; B.5; C. 6; D. 15.
Câu 23: Với câu lệnh for i:=1 to 10 do x:=x+1; biến i được khai báo thuộc kiểu dữ liệu nào?
A. Real; B. Integer; C. String; D. Char.
Câu 24: Lệnh lặp for..to..do của Pascal trong mỗi vòng lặp, biến đếm thay đổi như thế nào?
A. Tăng thêm 1 đơn vị; B. +1 hoặc -1;
C. Giá trị bất kì; D. Một giá trị khác 0.

II: Bài tập: Tính tổng các số tự nhiên đầu tiên chia hết cho 3 không vướt quá N cho trước (N được
nhập vào từ bàn phím).

MONG NHẬN ĐƯỢC SỰ TRỢ GIÚP TỪ CÁC BẠN !!!

1

I: Trắc nghiệm

Câu 1: C

Câu 2: A

Câu 3: C

Câu 4: C

Câu 5: C

Câu 6: D

Câu 7: B

Câu 8: D

Câu 9: C

Câu 10: B

Câu 11: D

Câu 12: B

Câu 13: B

Câu 14: A

Câu 15: B

Câu 16: B

Câu 17: Không rõ câu hỏi

Câu 18: B

Câu 19: B

Câu 20: B

Câu 21: A

Câu 22: C

Câu 23: B

Câu 24: A

II: Bài tập:
uses crt;
var i,s,n:longint;
begin
clrscr;
write('n='); readln(n);
s:=0;
for i:=1 to n do
if i mod 3=0 then s:=s+i;
writeln('tong cac so tu nhien chia het cho 3 khong vuot qua ',n,' la: ',s);
readln;
end.

PHẦN I. CÂU HỎI Câu 1: 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>; DFor <biến đếm>: <giá trị đầu> to <câu lệnh> do <giá trị cuối>; Câu 2: Vòng lặp While <Điều kiện> do <Câu lệnh>; là vòng lặp: A....
Đọc tiếp

PHẦN I. CÂU HỎI

Câu 1: 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>;

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

Câu 2: Vòng lặp While <Điều kiện> do <Câu lệnh>; là vòng lặp:

A. Chưa biết trước số lần lặp B. 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à <=100 D. Biết trước số lần lặp nhưng giới hạn là >=100

Câu 3: 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:=1;

for i:=1 to 5 do s := s*i;

A.120 B. 55 C. 121 D. 151

Câu 4: Phần thân chương trình bắt đầu bằng từ khóa:

A.End. B.Begin. C.Uses. D.Var.

Câu 5: Cú pháp khai báo biến mảng trong Pascal là:

A. var<Tên mảng> ; array [<chỉ số đầu>..<chỉ số cuối>] of<kiểu dữ liệu >;

B. var<Tên mảng> : aray [<chỉ số đầu>…<chỉ số cuối>] of<kiểu dữ liệu >;

C. var<Tên mảng> : array [<chỉ số đầu>..<chỉ số cuối>] of<kiểu dữ liệu >;

D. var <Tên mảng> : array [<chỉ số đầu>…<chỉ số cuối>] for<kiểu dữ liệu >;

Câu 6: 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 7: Chọn khai báo hợp lệ:

A. Var a,b: array[1 .. n] of real; C. Var a,b: array[1 : n] of Integer;

B. Var a,b: array[1 .. 100] of real; D. Var a,b: array[1 … 100] of real;

Câu 9: Trong lệnh lặp For…do của Pascal, trong mỗi vòng lặp, biến đếm thay đổi như thế nào?

A. +1 B. +1 hoặc -1 C. Một giá trị bất kì D. Một giá trị khác 0

Câu 10:Cú pháp của câu lệnh While…do là:

A. While<điều kiện>to<câu lệnh>;

C. While<điều kiện>do<câu lệnh>;

B. While<điều kiện>to<câu lệnh1>do<câu lệnh 2>;

D. While<điều kiện>; do<câu lệnh>;

Câu 11: Phần mềm học tập Anatomy giúp:

A. Vẽ hình hình học động

B. Luyện gõ chữ

C. Làm quen với giải phẫu cơ thể người

D. Xử lý âm thanh

Câu 12: 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 13: Sau khi thực hiện đoạn chương trình sau:

S:=0;

For i:=1 to 5 do S:=S+i;

Giá trị của biến S bằng bao nhiêu?

A. 20 B. 15 C. 10 D. 0

Câu 14:Biến a được nhận các giá trị là 0 ; -1 ; 1 ; 2,3 .

Ta có thể khai báo a thuộc kiểu dữ liệu nào?

A. Integer B. Char

C. Real D. Integer và Longint

Câu 15: Cho các câu lệnh sau hãy chỉ ra câu lệnh đúng:

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 to 10 for j:=1 to 10 do x:=x+1

Câu 16:Đánh dấu [X] vào ô đúng hoặc sai tương ứng trong các câu lệnh trong chương trình tính tổng 100 số tự nhiên đầu tiên, nếu sai sửa lại?

Câu lệnh

Đúng

Sai

Sửa lại

Program Chuong trinh

Var i,s : real;

Const n:=100;

Begin

Wile i <=n do;

Begin

S:=s+i

i =i+1

End.

Writeln(s)

Readln

End;

1
15 tháng 8 2020

1B,2A,3B,4B,5D,6D,7A,9D,10.B,11C,12.B,13.C,14.D,15.C,16.Đ S Đ Đ S Đ Đ S Đ S Đ Đ

I. Trắc nghiệm: Câu 1:Xác định bài toán là gì? A. Chỉ rõ các điều kiện cho trước và kết quả cần thu đc B. Chỉ rõ các điều kiện cho trước và phương pháp giải C. Chỉ rõ phương pháp giải và kết quả cần thu đc D. Chỉ rõ các bước để giải bài toán Câu 2: Giải thuật đổi giá trị hai biến x và y cho nhau, ta có thể thực hiện như sau: A. x -> z; z ->y; y-> x B. z->x; z->y; y->x C....
Đọc tiếp

I. Trắc nghiệm:
Câu 1:Xác định bài toán là gì?
A. Chỉ rõ các điều kiện cho trước và kết quả cần thu đc
B. Chỉ rõ các điều kiện cho trước và phương pháp giải
C. Chỉ rõ phương pháp giải và kết quả cần thu đc
D. Chỉ rõ các bước để giải bài toán
Câu 2: Giải thuật đổi giá trị hai biến x và y cho nhau, ta có thể thực hiện như sau:
A. x -> z; z ->y; y-> x B. z->x; z->y; y->x
C. z->x; x->y;y->z D. z->x; x->y; z->x
Câu 3: Phần thân chương trình của Pascal đc bắt đầu và kết thúc bởi cặp từ khóa:
A. Begin và end B. Begin: và end
C. Begin và end; D. Begin và end.
Câu 4: Kiểu dữ liệu thường dùng của Turbo Pascal là:
A. Xâu ký tự B. Số nguyên
C. Số thực D. Cả A, B và C đều đúng
Câu 5: Kết quả của phép chia 7 mod 5 thuộc kiểu gì?
A. Kiểu số nguyên B. Kiểu số thực
C. Kiểu xâu ký tự D. Kiểu thập phân
Câu 6: Nội dung các văn bản muốn ghi ra màn hình bằng lệnh Write phải đc đặt trong cặp dấu ngoặc:
A. ( và ) B. '' và '' C. ' và ' D. { và }
Câu 7: Để tăng biến nhớ X lên 1 đơn vị, ta thực hiện lệnh:
A. X => X + 1; B. X := X+1
C. X => X+ 1 D. X := X + 1;
Câu 8: Tính giá trị cuối cùng của c, biết rằng: a := 3; b := 5; a := a + b; c:= a+b;
A. c=8; B. c=3; C. c= 5; D. c= 13;
Câu 9: Câu lệnh Write và Writeln, Read và Readln khác nhau ở điểm nào?
A. Writeln và Readln sau khi thực hiện, con trở tự động xuống dòng kế tiếp
B. Write và Read sau khi thực hiện, con trở tự động xuống dòng kế tiếp
C. Write là viết ra còn Writeln là ghi vào
D. Read là đọc vào còn Readln là ghi ra
Câu 10: Cấu trúc rẽ nhánh dạng đủ có dạng như sau:
A. If <câu lệnh 1> Then <điều kiện> Else <Câu lệnh 2>;
B. If <điều kiện> Then <câu lệnh 1> Else <Câu lệnh 2>
C. If <điều kiện> Then <câu lệnh 1> Else <Câu lệnh 2>;
D.If <điều kiện> Then <câu lệnh 1>; Else <Câu lệnh 2>;
II. Tự luận:
11. Cấu trúc chương trình gồm mấy phần? Gồm những phần nào? Phần nào là quan trọng nhất và k thể thiếu đc?
12. Viết chương trình. Nhập vào ba số thực bất kỳ, báo ra màn hình giá trị lớn nhất trong ba số đó

0
Câu 1 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...do d. while...do Câu 2 Pascal sử dụng câu lệnh nào sau đây để lặp với số lần lặp chưa biết trước? a. if...then b. if...then...else c. for...do d. while...do Câu 3 Lệnh lặp nào sau đây đúng a. For <biến đếm >=<giá trị đầu>to <giá...
Đọc tiếp

Câu 1 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...do d. while...do

Câu 2 Pascal sử dụng câu lệnh nào sau đây để lặp với số lần lặp chưa biết trước?

a. if...then b. if...then...else

c. for...do d. while...do

Câu 3 Lệnh lặp nào sau đây đúng

a. For <biến đếm >=<giá trị đầu>to <giá trị cuối >do;

b. For <biến đếm >:=<giá trị đầu> to <giá trị cuối >do;

c. While< điều kiện > = do< câu lệnh > ;

d. While< điều kiện >:= do< câu lệnh>;

Câu 4 Phát biểu nào sau đây đúng ?

a. Phần mềm GeoGebra dùng để vẽ hình học .

b. Phần mềm Finger Break Out dùng để quan sát thời gian trên trái đất.

c. Phần mềm Pascal dùng để luyện gõ phím nhanh .

d. Phần mềm Sun Times dùng để lập trình .

Câu 5 Câu lệnh Pascal: While(3*5>=15) do Writeln (3*5); sẽ

a. In số 15 ra màn hình 3 lần .

b. In số 15 ra màn hinh 5 lần.

c. Không thực hiện lệnh Writeln (3*5);

d. Lặp vô hạn lần lệnh Writeln (3*5);

Câu 6 Trong câu lệnh lặp fof...do của pascal, mỗi vòng lặp , biến đếm thay đổi như thế nào?

a. +1 b.+1 hoặc -1

c. Một giá trị bất kì d. Một giá trị khác 0

Câu 7 Trong câu lệnh lặp

For i:=1to 20 do Begin s:= s+i end ;

Câu lệnh ghép 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. 1 lần b. không lần nào

c. 20 lần d. 21 lần

Câu 8 Lệnh lặp với số lần chưa biết trước nào sau đây là đúng?

a. For < biến đếm>=< giá trị đầu > to < giá trị cuối > do ;

b. For < biến đếm>:=<giá trị đầu > to < giá trị cuối > do;

c. While < điều kiện >=do < câu lệnh >;

d. While < điều kiện >:= do < câu lệnh ;

1

Câu 1: C

Câu 2: D

Câu 3: B

Câu 4: A

Câu 5: D

Câu 6: A

Câu 7: C

Câu 8: Không có câu nào đúng

LÝ THUYẾT: 1) Năm nay là 2020 vậy tháng 2 có điều kiện THANG2 > 0 và điều kiện nào sao đây: A. THANG2 <= 28 B. THANG2 <= 29 C. THANG2 <= 31 D. THANG2 <= 30 2) Để thể hiện điều kiện D lớn hơn hay 8 E là Gioi câu nào sau đây đúng A. (D >= 8) OR (E = ' Gioi ') B. ( D >= 8) OR (E= ''Gioi'') C. (D >= 8) OR (E = Gioi) D. D .= 8 OR E = Gioi 3) Để tìm giá trị lớn nhất của 2 số a,b thì ta viết: A. Max:=b;If a> Max then...
Đọc tiếp

LÝ THUYẾT:

1) Năm nay là 2020 vậy tháng 2 có điều kiện THANG2 > 0 và điều kiện nào sao đây:

A. THANG2 <= 28 B. THANG2 <= 29 C. THANG2 <= 31 D. THANG2 <= 30

2) Để thể hiện điều kiện D lớn hơn hay 8 E là Gioi câu nào sau đây đúng

A. (D >= 8) OR (E = ' Gioi ') B. ( D >= 8) OR (E= ''Gioi'')

C. (D >= 8) OR (E = Gioi) D. D .= 8 OR E = Gioi

3) Để tìm giá trị lớn nhất của 2 số a,b thì ta viết:

A. Max:=b;If a> Max then Max:=a; B. If (a>b) then Max:=a;If (b>a) then Max:=b;

C. Max:=a;If b>Max then Max:=b; D. Cả 3 câu đều đúng

4) Lệnh nào thể hiện A là số chẵn:

A. If A mod 2 <> 1 then write (' A là số lẻ ');

B. If A mod 2 <> 0 then write (' A là số chẵn ');

C. If A mod 2 = 0 then write (' A là số chẵn ');

D. If A mod 2 = 1 then write (' A là số chẵn ');

5) Chương trình sau cho biết kết quả là gì?

Var a, b: real; x integer; Begin readln(a, b); If a > b then x:=a else x:=b; Write(x); End.

A. Đảo giá trị của 2 biến a, b cho nhau

B. Chương trình không thực hiện được do lỗi khai báo kiểu dữ liệu

C. Xuất ra màn hình số lớn trong 2 số a, b đã nhập

D. Xuất ra màn hình số nhỏ trong 2 số a, b đã nhập

6) Điều kiện nào hợp lệ trong các điều kiện sau khi nói về ngày trong tháng 8:

A. (NGAY > 0) AND (NGAY <= 31) B. (NGAY > 0) AND (NGAY <= 30)

C. NGAY <= 31 D. NGAY > 0

7) Để thể hiện điều kiện D lớn hơn hay bằng 8 và E là Gioi câu nào sau đây đúng:

A. D >= 8 AND E= Gioi B. (D >= 8) AND (E= Gioi)

C. (D >= 8) AND (E= "Gioi") D. (D >= 8) AND (E= 'Gioi')

8) Xác định học sinh thi đậu hay rớt bằng câu lệnh nào sau đây:

A. If ĐTB >= 0 then Writeln('Thi đậu');

B. If ĐTB >= 0 then Writeln('Thi rớt');

C. If ĐTB >= 5 then Writeln('Thi đậu') else Writeln('Thi rớt');

D. If X mod 2=0 then Writeln('Thi rớt') else Writeln('Thi đậu');

9) Tìm số bé nhất trong 3 số x, y, z bằng câu lệnh nào sau đây:

A. min:=x; If y>min then min:=y else min:=z;

B. min:=x; If y>min then min:=y; if z>min then min:=z;

C. min:=x; If y<min then min:=y else min:=z;

D. min:=x; If y<min then min:=y; if z<min then min:=z;

10) Để thể hiện B lớn hơn 10 câu nào sau đây đúng:

A. B >= '10' B. B>= '10' C. B > 10 D. B >= 10

1

Câu 1: B

Câu 2: A

Câu 3: D

Câu 4: C

Câu 5: B

Câu 6: A

Câu 7: D

Câu 8: C

Câu 9: D

Câu 10: C

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

Câu 2: Lệnh While...do thuộc loại lệnh nào sau đây? a.Lệnh rẽ nhánh. c. Lệnh vòng lặp. b.Lệnh lựa chọn. d. Lệnh ghép. Câu 3:Việc đầu tiên lệnh While...do cần thực hiện là gì? a.Thực hiện <câu lệnh> sau từ khóa While...do. b.Thực hiện <câu lệnh> sau từ khóa Then. c.Kiểm tra giá trị của < điều kiện>. d.Kiểm tra < câu lệnh>. Câu...
Đọc tiếp

Câu 2: Lệnh While...do thuộc loại lệnh nào sau đây?

a.Lệnh rẽ nhánh. c. Lệnh vòng lặp.

b.Lệnh lựa chọn. d. Lệnh ghép.

Câu 3:Việc đầu tiên lệnh While...do cần thực hiện là gì?

a.Thực hiện <câu lệnh> sau từ khóa While...do.

b.Thực hiện <câu lệnh> sau từ khóa Then.

c.Kiểm tra giá trị của < điều kiện>.

d.Kiểm tra < câu lệnh>.

Câu 4: Câu lệnh sau từ khóa do trong câu lệnh While...do được thực hiện ít nhất mấy lần?

a.0 lần. b. 1 lần. c. 2 lần. d. vô số lần.

Câu 5: Cho biết < câu lệnh> sau từ khóa DO trong đoạn chương trình sau được thực hiện mấy lần?

var i: byte;i:= 5;While i<=5 do i:= i-1;

a.1 lần b. 2 lần c. 5 lần d. 6 lần

Câu 6: Đoạn lệnh sau đây cho biết kết quả nào?

var i: byte;

i:= 5;

While i<=5 do

Begin

Write(i:2);

i:= i-1;

end;

a.In ra các số từ 1 đến 5; b.In ra các số từ 0 đến 5;

c.In ra các số lần lượt từ 5 đến 0; d. In ra vô hạn các số5, mỗi số trên một dòng.

Câu 7:Đoạn lệnh sau đây cho biết kết quả nào?

Var so: byte:

so:= 1;

While so<10 do writeln(so);

so:=so+1;

a.In ra các số từ 1 đến 9; b.In ra các số từ 1 đến 10;

c.In ra vô hạn các số1, mỗi số trên một dòng. d.In ra các số từ 10 đến 1.

Câu 8:Cho đoạn chương trình sau:

Var x, tong : byte;

x:=0; tong:=0;

While tong <= 20 do

Begin

Writeln(tong);

tong:=tong +1;

End;

x:=tong;

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

a.20. b. 21. c. Không xác định. d. 0.

Câu 9: Hãy cho biết kết quả của đoạn chương trình dưới đây?

a:=10;

While a< 11do writlen(a);

a.Trên màn hình xuất hiện một số 10.

b.Trên màn hình xuất hiện 10 chữ.

c.Trên màn hình xuất hiện vô số chữ số10,chương trình bị lặp vô tận.

d.Trên màn hình xuất hiện một số11.

Câu 10: Khi sửdụng lệnh While...do cần chú ý điều gì?

a.Số lần lặp. b. Số lượng câu lệnh.

c.Không cần chú ý gì cả. d.Điều kiện vòng lặp để tránh vòng lặp không bao giờ kết thúc.

Câu 11:Câu lệnh viết đúng cú pháp lệnh lặp với số lần chưa biết trước.

a.While <điều kiện> to < câu lệnh>;

b.While <điều kiện>to < câu lệnh 1> do < câu lệnh 2>;

c.While <điều kiện> do < câu lệnh>;

d.While <câu lệnh> do < câu lệnh>;

Giup mình với nhé, mn

2
9 tháng 4 2020

mik ngu tin lắm

9 tháng 4 2020

hơi dài chút, giúp nhé mn, please!!!!

18 tháng 10 2016

câu 1:

var x:string

     y:integer

Câu 2:

var a,b:integer

begin

write('hay nhap gia tri cua a')

read(a)

wrietln('hãy nhập giá trị b')

read(b)

t:=a+b

writeln('tông cua a va b la',t)

 

18 tháng 10 2016

? đây là toán mà

4 tháng 12 2016

program CT_dautien;

uses crt;

var

begin

clrscr;

writeln('moi nhap diem'); readln(x);

if x>= 8.0 then write(x, ' la loai gioi');

if x>=6.5 then write(x, ' la loai kha');

if x>=5.0 then write(x, ' la loai trung binh');

if x>=3.4 then write(x, ' la loai yeu');

if x<3.4 then write(x, ' la loai kem');

readln

end.

4 tháng 12 2016

y quen cho var ban ghi la: var x: integer