Cho câu lệnh : If(a >6) then x:=x*7; y:=y-x. a) Điều kiện của câu lệnh điều kiện dạng thiếu trên là ? b) Câu lệnh của câu lệnh dạng thiếu trên là gì c) Tính giá trị của x và ý của câu lệnh trên nếu trước đó x:= 34 và y:= 6
Câu 2: Các câu lệnh sau đúng hay sai?
a) if x:=7 then a:=b;
b) if x > 5; then a:=b;
c) if x > 5 then; a:=b;
d) if x > 5 then a:=b; m:=n;
e) if x > 5 then a:=b; else m:=n;
f) if n > 0 then begin a:=0; m:=-1 end else c:=a;
a: Sai ở chỗ x=y
Sửa lại: x:=y;
b: Sai ở chỗ dấu chấm phẩy sau y>10
Sửa lại là bỏ dấu chấm phẩy
c: Sai ở chỗ có dấu chấm phẩy trước else
Sửa lại là bỏ dấu chấm phẩy
d:
Sai ở chỗ dấu chấm phẩy sau x>=7
Sửa lại là bỏ dấu chấm phẩy
Câu 1:
a) Với mỗi câu lệnh sau đây giá trị của biến x sẽ là bao nhiêu, nếu trước đó giá trị của x bằng 7?
if (75 mod 5) = 0 then x := x + 1;
if x > 10 then x := x + 1 else x := x - 1;
b) Câu lệnh Pascal sau đây có hợp lệ không? Giải thích.
If x > y then max: = x; else max: = y
Câu 2:
Viết chương trình sử dụng lệnh lặp FOR để tính tổng các số tự nhiên từ 1 đến 10
Câu 3:
Viết chương trình sử dụng lệnh lặp While – Do để tính tổng các số tự nhiên từ 1 đến 10
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.
Trong các câu lệnh Pascal sau câu nào viết đúng, câu nào sai. Vì sao?
A. If x:=7 then a=b;
B. If x>=5 then a:=b;
tin 8
B đúng. A sai Vì:
A. sau If là phép so sánh nên x:=7(đây là phép gán) nên k hợp lệ.
B. Sau If là so sánh và sau từ khóa then là câu lệnh(có thể là câu lệnh gán) -> hợp lệ.
Hi các đồng bạn ARMY~
Trong các câu lệnh Pascal sau đây, câu nào hợp lệ:
if x = a then x = x + 1;
if x := a then x := x + 1;
if a < b then max := b else max := a;
if a > b then max := a; else max := b;
Cho x:= 6; y:= 2; . Câu lệnh if x>y then z:=x-y else z:=y-x; writeln(z);. Cho kết quả *
Câu 19: Câu lệnh Pascal nào sau đây viết sai?
A. if x:= 5 then a = b;
B. if x > 4; then a:= b;
C. if x > 4 then a:=b; m:=n;
D. if x > 4 then a:=b; else m:=n;
Cho câu lệnh:If(a>6) then x:=x*7 else y:=y-4; y:=y-x a) Điều kiện của câu lệnh dạng đủ trên là ? b) Câu lệnh của câu lệnh 1 và 2 của câu lệnh điều kiện dạng đủ trên là ? c) Tính giá trị của x và y của câu lệnh trên nếu trước đó x:=34 và y:=6
b) Câu lệnh của câu lệnh 1 là x:=x*7
Câu lệnh của câu lệnh 2 là y:=y-4
Với mỗi câu lệnh sau đây giá trị của biến x sẽ là bao nhiêu , nếu trước đó giá trị của x bằng 5 ? If (45 mod 3) =0 then x:=x+1;
A. 4 B.5 C.6 D. 7
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