NEW
Font size
WorksheetsPascal Test 02
Total questions: 20
Worksheet time: 40mins
Trong các kiểu số nguyên sau, kiểu nào có giá trị lớn nhất
integer
longint
int64
Câu lệnh nào lấy căn bậc 2 của x
sqr(x)
sqrt(x)
Câu lệnh nào lấy kết quả là phần nguyên của số x
int(x)
round(x)
trunc(x)
Lệnh nào lấy phần thập phân của x
trunc(x)
frac(x)
round(x,0)
Câu lệnh nào để xuất giá trị của x
read(x)
write(x)
writeln('x')
readln(x)
Câu lệnh sau cho kết quả x=?
x= 30 div 4
7
2
3
8
Câu lệnh sau cho kết quả x=?
x= 30 mod 4
8
7
3
2
Đoạn lệnh sau cho kết quả x=?
n:=100;
if n mod 2=0 then x:=n div 2
else x:=n mod 2;
10
20
50
100
Đoạn lệnh sau cho kết quả x=?
n:=115;
if n mod 2=0 then x:=n div 2
else x:=n mod 2;
1
2
5
10
Để cho biến x nhận giá trị 100, người ta sử dụng phép gán, trong các biểu thức sau, biểu thức nào đúng
x=100
x:=100
x is 100
Cho biểu thức:
x:= 100 mod 3 +5;
x=?
4
6
8
1
Cho biểu thức:
x:= 100 mod (3 +5);
x=?
1
4
6
8
Cho biểu thức:
x:= 100+15 div 3;
x=?
38
105
100
Cho biểu thức: x= trunc(sqrt(26));
x=?
2
3
4
5
Cho lệnh sau:
x:=sqrt(sqrt(16));
x=?
2
4
8
16
Cho đoạn lệnh sau:
n:=100;
if frac(sqrt(x))=0 then x:=trunc(sqrt(x))
else x:=sqr(x);
x=?
10
100
10000
Cho đoạn lệnh sau:
x:=12.456789
write(x:0:2);
Kết quả trên màn hình là:
12
12.45
45
12.456789
Chương trình sau cho kết quả x=?
var n,x:longint;
begin
n:=1000000000000;
x:=sqr(n);
write(x);
end.
1000000000000
1000000000000000000
Không in kết quả
Báo lỗi
Chương trình sau cho kết quả x=?
var n,x:longint;
begin
n:=100;
x:=sqrt(n);
write(x);
end.
Báo lỗi
10
Chương trình sau cho kết quả x=?
var n,x:longint;
begin
n:=100;
if n mod 2=0 then
x:=n div 2;
else x:=n;
write(x);
end.
50
100
Báo lỗi
