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.

28 tháng 12 2021

Cây 19: A

Câu 20: A

7 tháng 10 2019

Ta có 91: 3 dư 1 nên không thực hiện câu lệnh sau then. Vậy X vẫn nhận giá trị ban đầu là 10.

   Đáp án: A

24 tháng 12 2021

a: x=10

b: x=10

17 tháng 1 2022

D

19 tháng 1 2022

B. 10

16 tháng 4 2023

Câu 1.

a/ x:=7;

if (75 mod 5) = 0 then x := x + 1; 

-> Điều kiện đúng -> x=7+1= 8

if x > 10 then x := x + 1 else x := x - 1;

x> 7 <=> 7 > 10 -> Điều kiện sai -> rẽ nhánh -> x=7-1 = 6

b/ 

Câu lệnh đó không hợp lệ. Vì để sai cấu trúc rẻ nhánh (thùa dấu ; ) sau max:=x

 

16 tháng 4 2023

Câu 2

Program HOC24;

var t,i: byte;

begin

t:=0;

for i:=1 to 10 do t:=t+i;

write('Tong la: ',t);

readln

end.

Câu 3

Program HOC24;

var i,t: byte;

begin

i:=1; t:=0;

while i<=10 do

begin

t:=t+i;

i:=i+1;

end;

write('Tong la: ',t);

readln

end.

12 tháng 5 2021

C

12 tháng 5 2021

Máy sẽ hiểu là:

nếu 45 chia 3 dư 0 thì x sẽ cộng thêm 1, mà x ban đầu bằng 5 nên sau khi chạy chương trình x sẽ là 6

=> Chọn C

4 tháng 12 2018

Ta có 45 mod 3 =0 ( phép lấy dư)→ đúng nên thực hiện câu lệnh sau then→ x= x + 2 = 5 +2 =7

   Đáp án: C

15 tháng 3 2019

a) ĐK đúng nên X=5+1=6

b) ĐK sai vì X<10 ( do 5<10) Nên câu lệnh không thực hiện

1 tháng 10 2018

a) 1

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