“Nếu b chia 2 dư 1 thì in ra màn hình b la so le” được thể hiện câu lệnh trong Pascal như thế nào?
A. If b/2=1 then Write(‘b la so le’);
B. If b mod 2=1 then Writeln(b la so le);
C. If b mod 2=1 then Write(‘b la so le’);
D. If b div 2=1 then Write(‘b la so le’);
Cho biết câu lệnh sau có kết quả như thế nào? a:=b; b:=a; If a>b then write(a) else if a
Một số câu lệnh trong chương trình sau viết không đúng, em hãy sửa lại cho đúng:
Program So_Sanh;
uses crt
var A: B= integer;
Begin
clrscr;
writeln(‘Nhap so A: ’);
readln(B);
writeln(‘Nhap so B, khac so A: ‘);
readln(B);
if A > B then; writeln(A,’ lon hon ‘,B) else writeln(B,’ lon hon ‘,A);
readln;
End.
Một số câu lệnh trong chương trình sau viết không đúng, em hãy sửa lại cho đúng:
program So_Sanh
uses crt;
var A B: integer;
begin
clrscr;
writeln(‘Nhap so A: ’) readln(A);
writeln(‘Nhap so B, khac so A: ‘); readln(B);
if A :> B then writeln(A,’ lon hon ‘,B) else writeln(B,’ lon hon ‘,A);
readln;
end.
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;
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;
Câu lệnh điều kiện dạng đầy đủ là:
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 >;
C. If < Điều kiện> then < Câu lệnh 1 >, < Câu lệnh 2 >;
D. If < Điều kiện > then < Câu lệnh 1 > Else < Câu lệnh 2 >;
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ẻ
1) Cho biết a := 3 ; b:= 6 ; câu lệnh sau cho kết quả b là bao nhiêu? if b < a then b:= b – a ;
2) Cho biết a := 3 ; b:= 6 ; câu lệnh sau cho kết quả b là bao nhiêu? if (a + b) > 5 then begin a:= a + 1 ; b:= b + 2 ; end else a:= b ;
3) Cho biết a := 3 ; b:= 6 ; câu lệnh sau cho kết quả b là bao nhiêu? if a > 5 then begin a:= a + 5 ; b:= b + 3 ; end else begin a:= a + 1 ; b:= b + 1 ; end ;
4) Cho biết a := 3 ; b:= 6 ; câu lệnh sau cho kết quả b là bao nhiêu? if b < 5 then begin a:= a + 5; b:= b + 2 ; end ;
5) Cho biết a := 3 ; b:= 6 ; câu lệnh sau cho kết quả b là bao nhiêu? if a <> b then b:= a + b ;
6) Cho biết a := 3 ; b:= 6 ; câu lệnh sau cho kết quả b là bao nhiêu? if a mod 2 = 0 then b:= 7) Cho biết a := 3 ; b:= 6 ; câu lệnh sau cho kết quả b là bao nhiêu? if a mod 2 = 1 then b:= 5 ;