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
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ả *
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
Cho đoạn chương trình: x:=4; y:=4; IF x > y THEN F:= 2*x – y ELSE IF x=y THEN F:= 2*x ELSE F:= x*x + y*y ; Sau khi thực hiện đoạn chương trình trên, giá trị F là:
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.
Cho biết kết quả sau khi thực hiện câu lệnh: x:=3; y:=7; if (x+y) mod 2=0 then write(‘tong chan’) else write(‘tong le’);
A. Thông báo lỗi
B. Tong chan
C. Tong le
D. Tùy trường hợp sẽ thông báo tổng chẵn hay tổng lẻ
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;
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ác câu lệnh Pascal nào sau đây được viết đúng: *
a If x:= 5 then a = b;
b If x > 4; then a:= b;
c If x > 4 then a:=b else m:=n;
d If x > 4 then a:=b; else m:=n;
Cho đoạn chương trình:
readln(x,y);
IF x > y THEN F:= 2*x – y ELSE
IF x < y THEN F:= sqr(x) + sqr(y) ELSE F:= 2*x;
Nếu nhập vào từ bàn phím x=0 và y=0 thì giá trị của F là:
A. 13
B. 6
C. 4
D. 0