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.
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;
program Tim_Max;
uses CRT;
var a,b,c,d,Max :integer;
Begin
clrscr;
Write('Nhap 4 so can so sanh ');
readln(a,b,c,d);
Max:=a;
If Max<b then Max:=b;
If Max<c then Max:=c;
If max<d then Max :=d;
Writeln('So lon nhat trong 4 so do la: ',Max);
readln;
End.
Tìm GTLN : =SUM(XA:YB) sau đó ấn enter,sử dụng nút điền , kéo thả chuột sang ngang để sao chép công thức.
xét lệnh if a>b then a:=b;
if a>c then a:=c;
writeln(a);
hỏi nếu a=7;b=6;c=8 thì lệnh trên sẽ đưa ra màn hình nội dung j
A. không có thông tin nào hiển thị trên màn hình C. đưa ra số 8
B. đưa ra số 6 D. đưa ra số 7
Đáp án: B nha bạn
ban ơi
nếu cho x=10,giá trị của x là bao nhiêu sau câu lệnh: if x>5 then x:=x+5?