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. -> x=7
Giải thích: 6 chia hết cho 3 -> ĐK đúng nên thực hiện câu lệnh x=x+1 <=> x=6+1=7
B. -> x= 12
Giải thích: Điều kiện 6 chia cho 3 dư 2 là sai, nhưng x>=5 là điều kiện đúng nên vẫn thực hiện câu lệnh x=2*x <=> x=2*6 =12
C. -> x=6
Giải thích: Điều kiện 6 chia 2 dư 1 và 6>10 đều sai nên không thực hiện câu lệnh tiếp theo
D. -> x=26
Giair thích: x chia 6 dư 0 ->ĐK đúng -> thực hiện câu lệnh :
x=x*x <=> x =6*6= 36
x=x-10 <=> x=36-10 = 26
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
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) Điều kiện B mod 2 <> 0 nếu đúng có ý nghĩa gì?
a) B là số dương b) B là số âm c) B là số chẵn d) B là số lẻ
2) Cấu trúc rẽ nhánh dạng đầy đủ:
a) If điều kiện then câu lệnh 1; else câu lệnh 2;
b) If điều kiện then câu lệnh 1else câu lệnh 2;
c) If điều kiện then câu lệnh;
d) If điều kiện then câu lệnh else câu lệnh;
3) Tìm số chẵn/ lẻ bằng câu lệnh nào sao đây :
a) If X mod 2= 0 then Writeln(' X là số lẻ ');
b) If X mod 2= 0 then Writeln(' X là số chẵn ');
c) If X mod 2= 0 then Writeln(' X là số lẻ ') else Writeln(' X là số chẵn ');
d) If X mod 2= 0 then Writeln(' X là số chẵn') else Writeln(' X là số lẻ ');
4) Tìm số lớn nhất trong 3 số x, y, z bằng câu lệnh nào sau đây:
a) max:=x; If y < max then max:= y else max:= z;
b) max:=x; If y > max then max:= y else max:= z;
c) max:=x; If y > max then max:= y; if z > max then max:= z;
d) max:=x; If y < max then max:= y; if z < max then max:= z;
5) Pascal sử dụng câu lệnh lặp nào sau đây là cấu trúc rẽ nhánh dạng thiếu
a) For ... to ... do; b) If ...then; c) If ...then...else d) While ...do;
6) Chọn câu lệnh Pascal hợp lệ trong các câu sau:
a) If a = 6 then x:= 100; b) If a > b then max:= a; else max:= b;
c) If a > b then max = a; d) If x := a + b then x: =x + 1;
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
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.