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

Câu 2: C

Câu 3: B

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...
Đọc tiếp
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 câu lệnh lặp For i:=3 to 15 do s:=s+i; Có bao nhiêu vòng lặp? *

A. 15; B. 12; C. 13 D. 3;

4, Cho k,m,n nhận giá trị tương ứng 4,5,6; kết thúc câu lệnh sau:X:=n; If ((x mod 2=0)) or (x<=5) then x:=m*k else x:=m div k; thì x có giá trị là ? *

A. 1 B. 0 C. 5. D. 20 5, Cho biết đoạn chương trình Pascal sau đây chương trình thực hiện bao nhiêu vòng lặp?s:=0; n:=0; while s<=5 do n:= n+1;s:= s+n; * A. 3 B. 6 C. 10 D. kết quả khác 6, Cho a,b,c lần lượt nhận giá trị 10,30,20 . Hỏi sau đoạn chương trình Begin X:=a; If x>a then x:=a; if x>b then x:=b;if x>c then x:=c;end; x có giá trị là? * A. 20 B. 10 C. 30 D. Cả ba đáp án đều sai. 7, Cho x:=7; kết thúc câu lệnh If ((x mod 3=0)) and (x<=8) then x:=x+10; thì x có giá trị là ? * A. 8 B. 10 C. 17 D. 7 8, Cho s và i là biến nguyên. Khi chạy đoạn chương trình s := 1; for i:=1 to 5 do s := s+i; Kết quả in lên màn hình là của s là ? * A. 15 B. 16 C. 11 D. 22 9, Cho biết đoạn chương trình Pascal sau đây, khi kết thúc giá trị của S bằng bao nhiêu? S:=0; n:=0;while S<=3 do begin n:= n+1;S:= s+n; end; * A. 15 B. 10 C. 6 D. 3
1
10 tháng 12 2020

1. C

2. D

3. C

4. D

5. D

6. B

7. D

8. B

9. C

 

26 tháng 2 2022

Sai

2 tháng 7 2020

1.B

2.C

TỔ TOÁN-TIN MÔN: TIN HỌC 8 I. TRẮC NGHIỆM 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>; d) For <biến đếm>: <giá trị đầu>to<câu lệnh> do <giá trị cuối>; Câu...
Đọc tiếp

TỔ TOÁN-TIN MÔN: TIN HỌC 8

I. TRẮC NGHIỆM

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

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

Câu 2: Câu lệnh pascal nào sau đây là hợp lệ?

a) For i:=10 to 1 do write(‘A’); c) For i:=1.5 to 10 do write(‘A’);

b) For i= 1 to 10 do write(‘A’); d) For i:= 1 to 10 do write(‘A’);

Câu 3: Vòng lặp while ..do là vòng lặp:

a) Biết trước số lần lặp c) Chưa biết trước số lần lặp

b) Biết trước số lần <=100 d) Biết trước số lần là >=100

Câu 4: Câu lệnh lặp while…do có dạng đúng là:

a) While <đk> do; <câu lệnh>; c) While <đk> <câu lệnh> do;

b) While <câu lệnh> do <đk>; d) While <đk>do <câu lệnh>;

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

Kết quả cuối cùng của s là : a) 11 b) 55 c) 101 d) 15

Câu 6: Trong đọan chương trình pascal sau đây x có giá trị là mấy

Begin x:= 3 ; If (45 mod 3) =0 then x:= x +2;

If x > 10 then x := x +10 ; End.

a) 3 b) 5 c) 15 d) 10

Câu 7: Trong chương trình pascal sau đây:

var a, b :integer;

s,cv :real ;

begin a:= 10; b:= 5; s:= a*b ; cv:= (a +b ) * 2 ; end.

Biến s và cv có giá trị là mấy:

a) s = 10 ; cv = 5 ; c) s= 30 ; cv = 50 ;

b) s = 50 ; cv = 40 ; d) s = 50 ; cv = 30 ;

Câu 8: Sau khi thực hiện đoạn chương trình j:= 0; for i:= 1 to 3 do j:=j+2; thì giá trị in ra màn hình là? a) 4 b) 6 c) 8 d) 10

Câu 9: Để 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 + 1/i

d) for i:=1 to n do

if ( i mod 2)=0 then S:=S + i;

Câu 10: Để tính tổng S=1/2+1/4 + 1/6 + … +1/ n; em chọn đoạn

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 – 1/i

d) for i:=1 to n do

if ( i mod 2)=0 then S:=S + i

Câu 11: Để đếm các số lẻ <= 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;

Câu 12: Câu lệnh nào sau đây lặp vô hạn lần

a) s:=5; i:=0;

While i<=s do s:=s + 1;

a) s:=5; i:=1;

While i<=s do i:=i + 1;

b) s:=5; i:=1;

While i> s do i:=i + 1;

d) s:=0; i:=0;

While i<=s do S:=S + i;

Câu 13: Chọn khai báo hơp lệ

a) Var a: array[1..n] of real;

c) Var a: array[1:n] of real;

b) Var a: array[1..100] of real;

d) Var a: array[1…n] of real;

Câu 14: Chọn khai báo hơp lệ

a) Const n=5;

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

c) Var n: real;

Var a,b: array[1:n] of real;

b) Var a,b: array[100..1] of real;

d) Var a:array[1.5.10] of real;

Câu 15: Thực hiện đoạn lệnh:

a[1]:=2; a[2]:=3; t:=a[1]+a[2]+1;
Giá trị của t là: a) t=1 b) t=3 c) t=2 d) t=6

II. TỰ LUẬN

1) Nhập số tự nhiên n từ bàn phím, in ra các số chẵn từ 1 đến n và tổng của chúng?

2) Nhập số tự nhiên n từ bàn phím, in ra các số chia hết cho 5 từ 1 đến n và tổng của chúng?

3) Tính trung bình cộng của n số nguyên nhập từ bàn phím?

4) Tìm số lớn nhất trong dãy n số nguyên nhập từ bàn phím?

5) Sửa lỗi cho các câu lệnh Pascal sau:

a. For i=1 to 10 do s= s+i; b. While i:=5 do s:= s+i;

c. Var a:array[100..1] of real; d. If a>b; then max:=a;

6) Kẻ bảng thể hiện các câu lệnh lặp sau:

a. s:=0; b. s:=0; i:=10;

For i:= 1 to 20 do While i>0 do

If I mod 5=0 then s:=s+i; begin s:=s+i; i:=i-1end;

7) Sau khi thực hiện các đoạn chương trình sau, giá trị của biến s và biến i bằng bao nhiêu?

a. s:=1; b. s:=0; i:=0;

For i:= 1 to 5 do s:=s*i; While i<5 do begin i:=i+1; s:=s+i end;

8) Cho biết kiểu dữ liệu của biến a và b trong các đoạn chương trình sau:

a. a:= 0; b:=0;

while a<5 do begin a:=a+1; b:=b+1/a end;

b. b:=1;

For a:= 1 to 5 do b:=b*a;

0
13 tháng 3 2019

1

Câu b) ko hợp lệ vì sau do phải là begin chứ ko phải là began, trong cặp từ khóa begin và end; là câu lệnh ghép (hai câu lệnh trở lên) chứ không phải là câu lệnh đơn, sau end là ; chứ ko phải là ,

Câu c) ko hợp lệ vì sau do thiếu một câu lệnh

Câu 4:

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

Cách thực hiện: Khi điều kiện thỏa mãn thì tiếp tục thực hiện câu lệnh cho đến khi điều kiện không thỏa mãn

Vd: While a mod b<>0 do a:=a+1;

Câu 5:

a) S=6

b) Treo máy

c) S=4

Câu 6:

Dữ liệu kiểu mảng là một tập hợp hữu hạn các phần tử có cùng một kiểu dữ liệu, gọi là kiểu của phần tử. Việc sắp thứ tự được thực hiện bằng cách gán cho mỗi phần tử một chỉ số

Cú pháp: Var <tên biến mảng>:array[<chỉ số đầu>..<chỉ số cuối>]of <kiểu dữ liệu>;

Vd: Var b:array[1..100]of real;

Câu khai báo biến mảng không chạy khi giá trị đầu lớn hơn giá trị cuối

1. Lặp với số lần chưa biết trước là lệnh gì? a. while..to..do b. for …to…do c. while …do d. if…then 2. “Nếu trời mưa thì em không đi chơi đá bóng”. Là câu lệnh gì? a. Câu lệnh lặp với số lần biết trước b. Câu lệnh lặp với số lần chưa biết trước c. Câu lệnh điều kiện d. Câu lệnh in ra màn hình 3. Hãy cho biết giá trị đầu của câu lệnh dưới đây: for i:=5 to 21 do...
Đọc tiếp

1. Lặp với số lần chưa biết trước là lệnh gì?

a. while..to..do

b. for …to…do

c. while …do

d. if…then

2. “Nếu trời mưa thì em không đi chơi đá bóng”. Là câu lệnh gì?

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

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

c. Câu lệnh điều kiện

d. Câu lệnh in ra màn hình

3. Hãy cho biết giá trị đầu của câu lệnh dưới đây:

for i:=5 to 21 do writeln(i*2);

a. 5 b. 6 c. 20 d. 21

4. Hãy cho biết giá trị cuối của câu lệnh dưới đây: for i:=5 to 21 do writeln(i*2);

a. 5 b. 6 c. 20 d. 21

5. Hãy cho biết số vòng lặp của câu lệnh dưới đây: for i:=5 to 21 do writeln(i*2);

a. 15 b. 16 c. 17 d. 18

6. Câu lệnh GotoXY(3,5) có tác dụng gì?

a. Đưa con trỏ về cột 3, hàng 5

b. Đưa con trỏ về cột 5, hàng 3

7. Hãy cho biết đoạn lệnh sau đây thực hiện bao nhiêu vòng lặp?

S:=0;

While S>10 do writeln(s*s);

a. 0 b. 1 c. 9 d. 10

8. Hãy cho biết đoạn lệnh sau đây thực hiện bao nhiêu vòng lặp?

S:=3; N:=1

While S<=10 do

Begin

N:=N+1;

S:=S+N;

End;

a. 2 b. 3 c. 4 d. 5

II. Tự luận

Hãy cho biết đoạn lệnh sau đây in ra giá trị của S là bao nhiêu?

S:=3; N:=1

While S<=10 do

Begin

N:=N+1;

S:=S+N;

End;

Writeln(S);

1
10 tháng 5 2020

I Trắc Nghiệm

1.c.

2. c.

3.a.

4.d.

5. c.

6.a.

7.a.

8.b.

II Tự luận

in ra S= 12

Chúc bạn học tốt

15 tháng 3 2023

Không có câu nào đúng.

A. Đúng theo cách trình bày nhưng thiếu dẫn đến vòng lặp vô hạn. Phải ghép 2 câu lệnh sau do lại bằng begin ... end;.

B. Sai vè sau while lại là 1 phép gán S:=10

C. Sai, vì sau do câu lệnh lại là 1 điều kiện a=b. Và đây cũng là 1 vòng lặp vô hạn

25 tháng 4 2020

B1: Trong các hoạt động sau đây hoạt động nào là hoạt động lặp với số lần chưa biết trước:

A. tính tổng các số tự nhiên từ 1 đến 20.

B. Nhập các số nguyên cho đến khi đủ 50 số

C. Mỗi ngày tập TD 2 lần

D. Nhập dữ liệu từ bàn phím cho đến khi nhập xong dữ liệu khi dừng

B2: Đoạn lệnh sau đây in ra kết quả gì?
s:=0; while s<10 do begin s:=s+1;
Writeln(s); end;
A. In ra các số từ 1 đến 9.
B. In ra các số từ 1 đến 10.
C. In ra các số 1.
D. Không có đáp án đúng.

B3: Hãy cho biết đâu là đoạn lệnh lặp bằng câu lệnh While...do để tính tổng S=1+2+...+10?
A. S:=0; while i<10 do S:=S+i;
B. S:=0; i:=0; while i<11 do begin S:=S+i; i:=i+1; end;
C. S:=0; i:=1; while i do S:=S+i; i:=i+1;
D. S:=0; i:=0; while i<=10 do begin S:=S+i; i:=i+1; end;

25 tháng 4 2020

Câu 3 chọn B và D phải không cô?