C. Chuc Anh Chi Thi Tot D. Không in gì cả
Câu hỏi: Biểu thức: s:= 21 Div 5+6; có giá trị là:
A. 10 B. 2 B. 2 C. 1 D. 11
Câu hỏi: Khi chạy chương trình:
Var S,i:Integer; Begin
i:=4; S:=40;
if (i>5) then S:=S*3+(5-i)*2 else if (i>3) then S:=S*i;
End. Giá trị sau cùng của S là? A. 160 B. 44 C. 40 D. 36
Câu hỏi: Khi chạy chương trình:
Var S,i:Integer; Begin
i:=4; S:=40;
if (i>5) then S:=S*3+(5-i)*2 else if (i>3) then S:=S+i;
End. Giá trị sau cùng của S là? A. 44 B. 160 C. 40 D. 36
Câu hỏi: Khi chạy chương trình:
Var S,i:Integer; Begin
i:=4; S:=40;
if (i>3) then S:=S*3+(5-i)*2 else if (i>5) then S:=S+i;
Giá trị sau cùng của S là?
A. 122 B. 160 B. 160 C. 44 D. 128
Câu hỏi: Khi chạy chương trình:
Var S,i:Integer; Begin
i:=4; S:=40;
if (S<30) then S:=S*3+(5-i)*2 else if (S>30) then S:=S+i; End. Giá trị sau cùng của S là? A. 44 B. 160 C. 40 D. 36
Câu hỏi: Cho i là biến nguyên. Sau khi thực hiện các lệnh:
i:=4; Case i Of 1: i:=i+1; 2: i:=i+2; 3: i:=i+3; Else i:=0; End; Kết quả in ra màn hình là: A. 0 B. 2 C. 4 D. 5
Câu hỏi: Cho m, n, i là các biến nguyên. Khi chạy chương trình:
m:=4; n:=5; i:=5; Repeat
i:=i+1;
Until (i mod m=0) and (i mod n=0); Giá trị sau cùng của i là?
A. 20 B. 5 B. 5 C. 4 D. 0
Var S,i,j:integer; Begin S:=0; For i:=1 to 3 do For j:=1 to 4 do S:=S+1; End. Giá trị sau cùng của S là: A. 12 B. 0 C. 3 D. 4
Câu hỏi: Khi chạy chương trình:
Var St:String; i.L:Integer; Begin
St:='Hom nay thuc tap'; L:=Length(St); For i:=1 to L do
if (St[i]>='a') and (St[i]<='z') Then St[i]:=Upcase(St[i]); Write(St);
End.
Chương trình in ra: