Câu 35: Đoạn lệnh sau đây sẽ cho kết quả là gì?ketqua := 1; While ketqua

1

ML

Minh Lệ

9 tháng 4 2022

Đáp án D

Bạn sửa lại đề chút: ketqua := 1; While ketqua<2 do writeln(ketqua);

Vì đây là vòng lặp với số lần chưa biết trước (while..do) trong câu lệnh chỉ có in ra biến ketqua mà không có lệnh nào làm thay đổi giá trị của biến ketqua, mà điều kiện ketqua<2 (luôn luôn đúng) -> vòng lặp vô hạn -> in vô hạn số 1 trên mỗi dòng (vì dùng writeln)

cho đoạn chương trình sau a:=1; while a<10 do write ( a); a:=a+1;Hãy cho biết kết quả của a bằng bao nhiêu?A. In ra từ 1 đến 9B. In ra từ 1 đến 10C. lặp vô hạnD. In ra 10Đáp án của bạn:ABCDCâu 02:Câu lệnh nào sau đây viết đúngA. While a<b do a=a+1;B. White a<b do a:=a+1;C. While a< b do a:=a+1;D. while a< b do ; a:=a+1Đáp án của bạn:ABCDCâu 03:kq:=0; while 2*a< b do begin a:=2*a; kq:=kq+1; end;Với a= 1; b=4 thì “ kq “ bằng bao nhiêu?A. 8B. 2C. 6D. 4Đáp...

LC

Long Châu

8 tháng 3 2022

cho đoạn chương trình sau a:=1; while a<10 do write ( a); a:=a+1;
Hãy cho biết kết quả của a bằng bao nhiêu?A. In ra từ 1 đến 9B. In ra từ 1 đến 10C. lặp vô hạnD. In ra 10

Đáp án của bạn:

Câu lệnh nào sau đây viết đúngA. While a<b do a=a+1;B. White a<b do a:=a+1;C. While a< b do a:=a+1;D. while a< b do ; a:=a+1

Câu 02:

Đáp án của bạn:

kq:=0; while 2*a< b do begin a:=2*a; kq:=kq+1; end;
Với a= 1; b=4 thì “ kq “ bằng bao nhiêu?A. 8B. 2C. 6D. 4

Câu 03:

Đáp án của bạn:

Đoạn chương trình nào sau không bị lỗiA. For i:=1 to n do x:=x+1B. For i=1 to n do x:=x+1;C. For i:=1 to n do x=x+1;D. For i:=1 to n do x:=x+1;

Câu 04:

Đáp án của bạn:

với a:=5; b:=6 ; ta có while b> a do b:=b+1;A. lặp vô hạnB. 1000C. 1000000D. 7

Câu 05:

Đáp án của bạn:

Đoạn lệnh sau cho kết quả x bao nhiêu. X:=0; for i:=1 to 5 do x:=x+i;A. 15B. 5C. 0D. 20

Câu 06:

Đáp án của bạn:

Cú pháp câu lệnh lặp biết trướcA. 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> doC. For < biến đếm> ; = < giá trị đầu> to < giá trị cuối> doD. For < biến đếm> : = < giá trị đầu> to < giá trị cuối> do

Câu 07:

Đáp án của bạn:

với d:=0; while d<n do begin d:=d+1; if d mod 10=0 then n:=n+3; end; wrtite(n); Với n=10 thì cho kết quả cuối cùng của n là bao nhiêu?

Câu 08:

A. 11B. 12C. 10D. 13

Đáp án của bạn:

Cho đoạn chương trình a:=3; b:=2; while b< a do b:=b+1; kết quả của a,b sau khi kết thúc lặp làA. 3,4B. 3,3C. 2,3D. 3,2

Câu 09:

Đáp án của bạn:

Cú pháp câu lệnh lặp chưa biết trướcA. While < điều kiện > doB. White < phép gán> do;C. While < điều kiện> do ;D. White < phép gán> do

Câu 10:

Đáp án của bạn:

Cho đoạn chương trình a=3; b:=2; while b< a do b:=a; kết quả của a,b sau khi kết thúc lặp làA. 2,3B. 3,4C. 3,3D. 3,2

Câu 11:

Đáp án của bạn:

Câu lệnh ghép là câu lệnh đặt giữa từ khóaA. begin;… end.B. Begin … end;C. Begin .. end.D. begin.. readln.

Câu 12:

Đáp án của bạn:

Đoạn lệnh sau cho kết quả x bao nhiêu. X:=0; for i:=1 to 5 do x:=x+1;A. 15B. 5C. 20D. 0

Câu 13:

Đáp án của bạn:

kq:=0; while 2*a< b do begin a:=2*a; kq:=kq+1; end;
Với a= 2; b=5 thì “ kq “ bằng bao nhiêu?A. 2B. 4C. 3D. 1

Câu 14:

Đáp án của bạn:

Đoạn chương trình nào sau không bị lỗiA. For i:=10 to 1 do x:=x+1;B. For i:=1 to 10 do x = x+1;C. for i:=1 to 10 do x:=x+1D. For i:=10 to 1 do x:=x+1

Câu 15:

Đáp án của bạn:

Đoạn lệnh sau cho kết quả x bao nhiêu. X:=0; for i:=5 to 1 do x:=x+i;A. 5B. 20C. 15D. 0

Câu 16:

Đáp án của bạn:

for i:=1 to n do if n mod 2 =0 then s:=s+i; với n =6 thì kết quả s là?A. 15B. 0C. 21D. 5

Câu 17:

Đáp án của bạn:

cho đoạn chương trình sau a:=1; while a<10 do begin write ( a); a:=a+1; end;
Hãy cho biết kết quả của a bằng bao nhiêu?A. In ra từ 1 đến 10B. In ra 10C. In ra từ 1 đến 9D. lặp vô hạn

Câu 18:

Đáp án của bạn:

s:= 0; for i:=1 to n do if n mod 2 =0 then s:=s+i; với n =5 thì kết quả s là?A. 15B. 1C. 5D. 0

Câu 19:

Đáp án của bạn:

Cho đoạn chương trình a:=3; b:=2; while b< a do begin b:=a; a:=b end; kết quả của a,b sau khi kết thúc lặp làA. 2,3B. 3,3C. 3,2D. 3,4

Câu 20:

2

LC

Long Châu

8 tháng 3 2022

giúp mình vs ạ

NL

Nguyễn Lê Phước Thịnh

8 tháng 3 2022

Chọn B

TV

trần văn thiên hoàng

8 tháng 4 2022

Câu 36: Giả sử a:=2; thì sau câu lệnh For i:=1 to 3 do a:=a*a; a nhận giá trị bằng bao nhiêu? A. 16 B. 256 C. 64 D. 128

1

ML

Minh Lệ

9 tháng 4 2022

Bạn kiểm tra lại đề nhé, phải dùng biến khác để làm câu lệnh gán sau do mới được những kết quả đó (A,B,C,D) (ví dụ t:=t*a;). Theo đề kết quả cuối cùng sẽ là a:=a*a=2*2=4.

BL

Bùi Lê Thanh Trúc

9 tháng 4 2022

Câu 36: Giả sử a:=2; thì sau câu lệnh For i:=1 to 3 do a:=a*a; a nhận giá trị bằng bao nhiêu?

A. 16 B. 256 C. 64 D. 128

1

NL

Nguyễn Lê Phước Thịnh

9 tháng 4 2022

Chọn A

DN

Đào Nguyễn Hà Trang

2 tháng 3 2022

câu lệnh pascal: s:1; while s<9 do writeln(s)_; sẽ:

A.không in ra các số từ 1 đến 9

B. in ra vô hạn số 1, mỗi số trên một dòng

C.ko thực hiện lệnh writeln(s);

D.In ra các số từ 1 đến 9

2

K

Kakaa

2 tháng 3 2022

B

NP

Nguyễn Phương Anh

2 tháng 3 2022

B

Bài 1: Viết chương trình pascal thực hiện các yêu cầu sau: a) Nhập từ bàn phím 1 số nguyên n b) In ra màn hình kết quả tổng các số nguyên từ 1 đến n (sử dụng câu lệnh lặp while...do) Bài 2: Viết chương trình pascal thực hiện câc yêu cầu sau: a) Nhập từ bàn phím 1 số nguyên dương n b) In ra màn hình kết quả tổng các số lẻ từ 1 đến n (sử dụng câu lệnh lặp while...do giúp mình với mình đang...

TU

Thư Uyên

26 tháng 3 2021

3

NL

Nguyễn Lê Phước Thịnh

26 tháng 3 2021

Bài 1:

uses crt;

var n,i,s:integer;

begin

clrscr;

write('Nhap n='); readln(n);

s:=0;

i:=1;

while i<=n do

begin

s:=s+i;

inc(i);

end;

writeln('Tong cac so trong khoang tu 1 den ',n,' la: ',s);

readln;

end.

NL

Nguyễn Lê Phước Thịnh

26 tháng 3 2021

Bài 2:

uses crt;

var n,i,s:integer;

begin

clrscr;

write('Nhap n='); readln(n);

s:=0;

i:=1;

while i<=n do

begin

s:=s+i;

i:=i+2;

end;

writeln('Tong cac so le trong khoang tu 1 den ',n,' la: ',s);

readln;

end.

1, Cho s và i là biến nguyên. Khi chạy đoạn chương trình: s:=0;for i:=1 to 3 do s := s+3*i; s:=s+5;writeln(s); Kết quả in lên màn hình là? * A.12 B. 10 C.23 D. 26 2, Kêt quả của câu lệnh For i:=1 to 20 do if i mod 3=2 then write(i:3); * A.In ra các số lẻ từ 1 đến 20; B. In ra các số chẵn từ 1 đến 20; C. In ra các số chia hết cho 3 từ 1 đến 20; D. In ra các số chia hết cho 3 dư 2 từ 1 đến 20; 3, Trong...

HN

Hương Nguyễn

5 tháng 6 2020

1

KV

Kiều Vũ Linh

10 tháng 12 2020

1. C

2. D

3. C

4. D

5. D

6. B

7. D

8. B

9. C

ST

Sinh Tran

26 tháng 2 2022

Sai

Phần I. Trắc nghiệm. (5 điểm) 1. Nhặt thóc ra khỏi gạo cho đến khi trong gạo không còn lẫn thóc là hoạt động: a. Lặp 10 lần c. Lặp vô số lần (lặp vô hạn) b. Lặp với số lần chưa biết trước d. Lặp với số lần biết trước 2. Trong câu lệnh lặp For i:=1 to 10 do begin.... end bao nhiêu vòng lặp được thực hiện? a. Không lần nào b. 10 lần c. 1 lần d. 2 lần 3. Điều kiện kết thúc vòng lặp For... do của...

BA

Bảo Ân

26 tháng 4 2020

Phần I. Trắc nghiệm. (5 điểm)
1. Nhặt thóc ra khỏi gạo cho đến khi trong gạo không còn lẫn thóc là hoạt động:
a. Lặp 10 lần c. Lặp vô số lần (lặp vô hạn)
b. Lặp với số lần chưa biết trước d. Lặp với số lần biết trước
2. Trong câu lệnh lặp For i:=1 to 10 do begin.... end bao nhiêu vòng lặp được thực hiện?
a. Không lần nào b. 10 lần c. 1 lần d. 2 lần
3. Điều kiện kết thúc vòng lặp For... do của Pascal là:
a. Biến đếm lớn hơn giá trị cuối c. Giá trị đầu bằng giá trị cuối
b. Biến đếm lớn hơn hoặc bằng giá trị cuối d. Giá trị đầu lớn hơn giá trị cuối
4. Trong các câu lệnh Pascal sau, câu lệnh nào hợp lệ?
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.5 to 10 do x:=x+1;
5. Trong lệnh lặp For... do của Pascal, sau từ khóa “do” nếu có từ 2 câu lệnh trở lên (câu lệnh
ghép) thì câu lệnh ghép đó phải đặt trong cặp từ khóa nào sau đây?
a. Begin.....readln; b. Begin.....and;
c. End.....Begin d. Begin.....end;
6. Câu lệnh sau đây cho kết quả như thế nào?
For i:=1 to 10 do Writeln(‘A’);
a. In dãy số từ 10 đến 1 ra màn hình c. In dãy số từ 1 đến 10 ra màn hình
b. In 20 ký tự A ra màn hình d. In 10 ký tự A ra màn hình
7. Sau khi thực hiện đoạn chương trình sau, giá trị của biến T bằng bao nhiêu?

i := 0; T := 0;
While i < 3 do
begin T := T + 1; i := i + 1; end;

a. T = 2 b. T = 3 c. T = 4 d. T = 5
8. Cú pháp của câu lệnh lặp với số lần chưa biết trước trong Pascal:
a. While <câu lệnh> do <điều kiện>; c. While <điều kiện> do <câu lệnh>;
b. While <giá trị cuối > do <giá trị đầu>; d. While <giá trị đầu> do <giá trị cuối>;
9. Trong lệnh lặp While... do của Pascal, nếu điều kiện đúng thì:
a. Tiếp tục vòng lặp c. Vòng lặp vô tận
b. Lặp 10 lần d. Thoát khỏi vòng lặp
10. Trong các câu lệnh Pascal sau, câu lệnh nào hợp lệ?
a. x:=1; while x:= 10 do x:=x+5; c. x =1 while x>10 do x:=x+5;
b. x:=1; while x <10 do x:=x+5; d. x:=10; while x<10 do x=x+5;
Phần II. Bài tập. (5 điểm)
Câu 1: Cho đoạn chương trình sau: (2đ)

m:=2; k:=3;
For i:= 0 to 4 do begin

m:=m+1;
k :=k+m;
end;

Sau khi thực hiện đoạn chương trình trên giá trị của các biến m, k bằng bao nhiêu?
1. Câu 2: (3đ)Viết chương trình tính tổng: S= 1+ 1/2 + 1/3 + ….. + 1/N

(n là số nguyên được nhập từ bàn phím)

Làm giúp mình trước ngày 29/04/2020 nha !

1

BA

Bảo Ân

27 tháng 4 2020

Cảm ơn ạ !

NL

Nguyễn Lê Phước Thịnh

26 tháng 4 2020

Phần II: Bài tập

Câu 1:

Sau khi thực hiện chương trình, chương trình sẽ báo lỗi thiếu begin

Câu 2:

uses crt;

var i,n:integer;

s:real;

begin

clrscr;

write('n='); readln(n);

s:=0;

for i:=1 to n do

s:=s+1/i;

writeln(s:4:2);

readln;

end.

C©u 2: Lệnh Clrscr dùng để làm gì? A. In thông tin ra màn hình. B. Tạm ngưng chương trình. C. Xoá màn hình kết quả. D. Khai báo thư viện. Câu 3: Trong Pascal khai báo hằng bằng từ khóa: A. Const B. Var C. Type D. Uses Câu 4: Câu lệnh nào sau đây dùng để nhập một số từ bàn phím vào biến x? A. Writeln(‘Nhap x = ’); B. Write(x); C. Writeln(x); D. Readln(x); C©u 5: Trong Pascal, khai b¸o nµo sau ®©y lµ ®óng cho khai b¸o biÕn? A. Var tb: real B. Var R = 30; C....

XB

Xuân Bách Đoàn

27 tháng 5 2021

C©u 2: Lệnh Clrscr dùng để làm gì? A. In thông tin ra màn hình. B. Tạm ngưng chương trình. C. Xoá màn hình kết quả. D. Khai báo thư viện. Câu 3: Trong Pascal khai báo hằng bằng từ khóa: A. Const B. Var C. Type D. Uses Câu 4: Câu lệnh nào sau đây dùng để nhập một số từ bàn phím vào biến x? A. Writeln(‘Nhap x = ’); B. Write(x); C. Writeln(x); D. Readln(x); C©u 5: Trong Pascal, khai b¸o nµo sau ®©y lµ ®óng cho khai b¸o biÕn? A. Var tb: real B. Var R = 30; C. Const x: real; D. Var y: integer; Câu 6: Biểu thức toán học (a+1)2 – được viết dưới dạng biểu thức trong Pascal là: A. (a+1)*a+1 – 7*a/2 B. (a+1)*(a+1) – 7*a/2 C. a+1 * a+1 – 7*a/2 D. (a+1)(a+1) – 7a/2 Câu 7: Cách gán giá trị a + b vào biến Tong là: A. Tong:a+b; B. Tong(a+b); C. Tong=a+b; D. Tong:=a+b; Câu 8: Kết quả của phép chia, phép chia lấy phần nguyên và lấy phần dư của hai số nguyên 47 và 5 là: A. 47/5 =9; 47 div 5 = 9 ; 27 mod 5 = 2 B. 47/5 =9; 47 div 5 = 9 ; 27 mod 5 = 9 C. 47/5 =9.4; 47 div 5 = 9 ; 27 mod 5 = 2 D. 47/5 =9.4; 47 div 5 = 2 ; 27 mod 5 = 9 Câu 9: Câu lệnh nào sau đây có kết quả là 3? A. 25 div 6 B. 25 div 7 C. 25 div 8 D. 25 div 9 Câu 10: Cú pháp của câu lệnh For…do là A. For = to do ; B. For := to do ; C. For := to do D. For := to do ; Câu 11: Sau khi thực hiện đoạn chương trình sau, giá trị của biến j bằng bao nhiêu? j:=0; For i:=0 to 5 do j:=j+2; A. 20 B. 12 C. 7 D. 5 Câu 12: Câu lệnh lặp For i:=3 to 10 do Begin end; vòng lặp thực hiện bao nhiêu lần a) Không lần nào; b) 7 lần; c) 8 lần; d) 10 lần. Câu 13: Câu lệnh nào sau đây được viết đúng cú pháp? A. While <điều kiện> to ; B. While < câu lệnh > do < điều kiện >; C. While <điều kiện> to do ; D. While <điều kiện> do ; Câu 14: Xác định số lần lặp trong đoạn chương trình sau: A:=5; While A<20 do A:=A+5; A. 1 B. 4 C. 5 D. vô hạn lần Câu 15: Cho đoạn chương trình: X:=10; Repeat X:=X*2; until X>25; X có giá trị là: A. 10 B. 20 C. 26 D. 40 Câu 16: Đoạn chương trình pascal sau: x:= 3 ; While x > 10 do x:=x+3; giá trị của x là: A. 3 B. 6 C. 12 D. 13 Câu 17: Hãy cho biết kết quả của đoạn chương trình A:=10; while A>=10 do write (a); A. Trên màng hình xuất hiện 1 chữ a. C. Trên màng hình xuất hiện số 10. B. Trên màng hình xuất hiện 10 chữ a. D. Chương trình lặp vô hạn lần. Câu 18: Trong các cánh khai báo biến mảng sau đây, cách khai báo nào là hợp lệ: A. Var A: array[1,100] of integer; B. Var A: array[1..100] of integer; C. Var A: array(1..100) of integer; D. Var A: array[1,,100] of integer; Câu 19: Trong câu lệnh khai báo biến mảng, phát biểu nào sau đây sai: A. Chỉ số cuối phải nhỏ hơn hoặc bằng 100 C. Kiểu dữ liệu có thể là integer hoặc real B. Chỉ số đầu và chỉ số cuối là hai số nguyên D. Chỉ số đầu  chỉ số cuối Câu 20: Xuất dữ liệu từ mảng A có 30 phần tử từ 5 đến 15 thì ta viết lệnh như sau: A. For i:=5 to 15 do Writeln(A); C. Writeln(A[5..15]); B. For i:=5 to 15 do Writeln(A[i]); D. Writeln(A[i]); Câu 21: Biểu tượng của phần mềm Anatomy: A. B. C. D. Câu 22: Trong phần mềm Anatomy, đâu là biểu tượng của hệ thần kinh A. B. C. D. Câu 23: Hệ cơ có chức năng là: A. Giúp lưu thông máu đi khắp cơ thể để nuôi từng tế bào. B. Co, dãn để làm cho xương chuyển động C. Thải các chất độc ra bên ngoài cơ thể. D. Tiếp quản thức ăn từ miệng và tiêu hoá, hấp thụ, biến thức ăn thành năng lượng nuôi cơ thể Câu 24: Trong phần mềm Anatomy, đâu là biểu tượng của hệ tuần hoàn A. B. C. D. Câu 25: Hệ tiêu hóa có chức năng là: A. Giúp lưu thông máu đi khắp cơ thể để nuôi từng tế bào. B. Co, dãn để làm cho xương chuyển động C. Thải các chất độc ra bên ngoài cơ thể. D. Tiếp quản thức ăn từ miệng và tiêu hoá, hấp thụ, biến thức ăn thành năng lượng nuôi cơ thể

1

TT

😈tử thần😈

27 tháng 5 2021

Dài quá bạn nên đăng mỗi lần 5-> 10 câu cho dễ đọc