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.

a: S=35

b: S=62

c: S=32

17 tháng 3 2023

a/

Giá trị đầu của vòng lặp là 1, giá trị cuối là 5 => biến đếm của k lần lượt tăng thành 1 dãy số 1,2,3,4,5 

k mod 2 =0 -> nếu k là số chẵn thì biến i tăng lên 1 đơn vị. Dãy số gồm 2 số chẵn (2,4) => i tăng 2 đơn vị => i = -1 + 1 + 1 = 1

j = j + i => j = 20 + 1 = 21

Vậy i=1; j=21

b/

Lần lặp thứ nhất: m=0*10 + 7 = 7 ; n = 12

Lần lặp thứ 2: m=7*10 + 2 = 72; n= 1

Lần lặp thứ 3: m=720 + 1 = 721; n=0 (n=0 => dừng vòng lặp)

Vậy m=721

25 tháng 3 2022
16 tháng 3 2023

S từ đâu ra vậy ? 

 

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...
Đọ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
14 tháng 3 2019

Đáp án D

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

1. Cho đoạn chương trình:      S:=4;                                    For i:=5 to 5 do S:=S+2;    Sau khi thực hiện đoạn chương trình trên, giá trị của biến S bằng bao nhiêu?A. 6                             B. 8                             C. 10                           D. 122. Câu lệnh trong pascal: S:=1; While S<10 so s:=s*2;A. 10                           B. 12                           C. 14                           D. 163. Giả sử ta có biếng mảng A lần...
Đọc tiếp

1. Cho đoạn chương trình:      S:=4;

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

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

A. 6                             B. 8                             C. 10                           D. 12

2. Câu lệnh trong pascal: S:=1; While S<10 so s:=s*2;

A. 10                           B. 12                           C. 14                           D. 16

3. Giả sử ta có biếng mảng A lần lượt có các giá trị của phần tử sau:

a

Giá trị

5

8

9

5

3

5

Chỉ số

1

2

3

4

5

6

Ta có câu lệnh S:=0; S:=S+a[1]+a[6] thì giá trị S sẽ bằng bao nhiêu:

A. 8                             B.9                              C. 10                           D. 11

4. Trong Pascal ta sử dụng lệnh: S:=5; for i:=5 to 5 do s:=s+1;

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

5*.Viết cú pháp câu lệnh lặp với số lần biết trước và câu lệnh lặp với số lần chưa biết trước.

1
27 tháng 4 2021

1.A

2.D

3.C

4. Đề không có phương án đúng. Đáp án đúng là :6 bạn nhé!

5.

- Lệnh lặp với số lần biết trước:

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

** Lệnh lặp ngược: 

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

- Lệnh lặp với số lần chưa biết trước:

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