IF a>4 THEN b:=2 ELSE b:=7; Khi a nhận giá trị là 10 thì b nhận giá trị nào?
A. 4 B. 10 C. 2 D. 7
If a>b Then Write(a) else write(b);
Khi a nhận giá trị là 6, b nhận giá trị là 6 thì câu lệnh nào sẽ thực hiện?
A. Write(a) B. write(b);
C. Write(a) và write(b); D. Bỏ qua cả hai câu lệnh.
Các câu lệnh Pascal sau đây được viết đú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 a:= 7; b:= 3; Kết quả sau khi thực hiện câu lệnh dưới đây là: if a>b then writeln(‘a>b’) else writeln(‘a<b’);
A. a>b B. a=b C. a<b D. a≠b
Hãy cho biết giá trị của biến a, biến b bằng bao nhiêu sau khi thực hiện đoạn lệnh sau: a:=3; b:=7; if (a>b ) then a:=a+5 else b:=b-2;
Cho biết kết quả x của câu lệnh sau: x:=52; If x mod 5=0 then x:=x+1 else x:=x div 5 A) x=55 B) x=10 C) x=0 D) x=11
Một số câu lệnh trong ct sau đây viết ko đúng, em hãy sửa lại những lỗi sai
program So_sanh
usercrt;
var A,B=interger;
Begin clrscr;
writeln('Nhap so A:'); readln(A);
writeln('Nhap so B:'); readln(B);
if A <> B then writeln('A',' khac ',B) else writeln(B,'=' ,A)
readln
End.
Chỉ rõ lỗi sai và sửa lại cho đúng:
a) if x:=100then x:= x+1
b) if a<b then max = b;
c) if a>b then max :=a; else max:= b;
d) if a>b then max = a else max:=b;
1/ Sau khi chạy đoạn chương trình sau giá trị của a, b bằng bao nhiêu?
a:=4 ; b:=12; If a<b then a:=a+b else Begin a:=a-b; b:=b+a end;
2/ Cho đoạn chương trình sau:
a:=3 ;b:=3;c:=0 if a=b then c:=a-b+1 c:=c+1;
sau khi thực hiện đoạn chương trình trên , giá trị của c là bao nhiêu?
mai mình thi rồi!
Cho biết kết quá các câu lệnh sau:
a) Biết a có giá trị là 10.
If (a mod 2 = 0) then write(a, 'chia het cho 2') else wite('khong thoa man');
b) Biết x có giá trị là 5, y có giá trị là 7
If (x >= 5) and (y >7) then x := x+2 else y := y+3
Giúp vss mai ktra học kì rồiiiii