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.

12 tháng 6 2020

Bài 1: S=15

Bài 2: S=17

Bài 3:

1)X:=10; while X:=10 to X:(thiếu dấu '=') X+5;

2) X:=10; while X = 10 do X(thiếu dấu ';') =X+5 (thiếu dấu ';')

3) S:=0; n:=0; while S <= 10 do (thiếu 'begin') n:(thiếu dấu '=')n+1 ,(để kết thúc đoạn lệnh dùng dấu ';' không phải dấu ',') S:= S+n; (thiếu end;)

14 tháng 8 2018

a) Thừa dấu hai chấm trong điều kiện;

b) Thiếu dấu hai chấm trong câu lệnh gán;

c) Thiếu các từ khóa begin và end trước và sau các lệnh n:=n+1; S:=S+n, do đó vòng lặp trở thành vô tận.

12 tháng 10 2019

a) 2 lỗi

- thiếu do

- vòng lặp for tuyệt đối không có ;

b: sau writeln('A') không có chấm phẩy

c: sai chỗ y:=10

phải là y=10 mới đúng

d: sử dụng 2 chấm phẩy là sai

sau while do nếu có từ 2 lệnh trở lên phải bao bọc trong begin end

e: thiếu dấu : sau i, đi từ 100 tới 20 là sai,

phải là for i:=100 downto 20 do mới đúng

f: không sai

20 tháng 4 2023

a) Lỗi: Dư dấu ; sau từ do

b) Lỗi: While i>20 then (sửa: While i>20 do)

c) Lỗi: B=B+2; (sửa: B:=B+2;)

d) Lỗi: dư dấu ; sau từ do

e) Lỗi: S=S*2; (sửa: S:=S*2;)

f) Lỗi: i:=1 (sửa: i:=1;)

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

24 tháng 3 2022

D

24 tháng 3 2022

d

Câu 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 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.15Câu 2: Câu lệnh nào sau đây lặp vô hạn lầna) s:=5; i:=0;   While i<=s do            s:=s + 1;c) s:=5; i:=1;   While i<=s doi:=i + 1;b) s:=5; i:=1;   While i> s do       ...
Đọc tiếp

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

c) 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<=n do  begin                  

if (i mod2)=1  Then  S:=S + i;

Else i:=i+1;  End;

Câu 3: : Em hãy viết chương trình tìm số nhỏ nhất trong N số được nhập vào từ bàn phím

Câu 4: Viết chương trình nhập vào dãy số N phần tử, tính tổng dãy số, in ra màn hình dãy số vừa nhập và kết quả của tổng.

5
3 tháng 5 2021

1-D
2-D

3 tháng 5 2021

Câu 3

21 tháng 3 2023

S = 0 + 2*1 + 2*2 + 2*3 = 2 + 4 + 6 = 12 -> A

21 tháng 3 2023

Đoạn chương trình trên tính tổng của 3 số chẵn liên tiếp nhau, bắt đầu từ 2.

Thứ tự tính toán như sau:

i=1: s=0+2*1=2i=2: s=2+2*2=6i=3: s=6+2*3=12

Vậy kết quả in lên màn hình là A. 12.