Cho đoạn chương trình sau:
s := ‘123456789’;
delete (s, 1, 8);
write(s);
Kết quả in ra màn hình là:
A. ‘6789’
B. ‘789’
C. ‘9’
D. ‘’
Câu 17. Hãy cho biết chương trình dưới đây sẽ thực hiện bao nhiêu vòng lặp khi thực hiện đoạn chương trình n:=16; T:=T -n; end;
A.2 B.3 C.4 D.5
Câu 18: Cho đoạn chương trình sau:
S:=10; x:=0,5;
While >=6,2 do
S:=S-x;
Hãy cho biết giá trị của S sau đoạn chương trình trên:
A. 5 B. 4 C.6 D.7
Câu 19. Sau khi thực hiện đoạn chương trình sau:
j:=0; s:=1;
for i:=1 to 3 do
j:=j+1;
s:=j+1;
Gía trị của biến j, biến s bằng?
A. j=4, s=3 B.j:=3; s=4 C.j:=1; s=2 D.j:=2; s:=3
Câu 21. Gỉa sử có dòng lệnh :
for i:=0 to 9 do
a:=1+i;
Số lần lặp của lệnh gán a:=1+i là:
A.11 B.0 C.10 D.9
Tìm giá trị của s, i trong đoạn chương trình sau:
S:=0; i:=0
while i<=3 do
Begin
i:=i+2;
s:=s+i;
end;
Cho biết kết quả sau khi thực hiện đoạn chương trình sau:
S:=0;
FOR i:=1 to 15 DO
IF a[i] mod 2 = 0 THEN
S:=S+a[i];
writeln(‘S = ’,S);
Trong đoạn chương trình sau:
s:=-2; i:=1;
while s <= 15 do
begin
i:=i+3;
s:=s+i;
End;
Vòng lặp chạy bao nhiêu lần?
Sau khi thực hiện đoạn chương trình sau:
S:=0; For i:=1 to 3 do S:=S+i;
Giá trị của biến S bằng bao nhiêu?
hãy đọc đoạn chương trình sau:
s:=1;i:=1
while s<100 do
begin s:=s*i; i:=i+2; end;
sau khi thực hiện xong, kết quả s bằng:.......
Cho đoạn chương trình sau:
s := copy(‘123456789’, 1, 3);
write(s);
Kết quả in ra màn hình là:
A. ‘123’
B. 123
C. ‘3’
D. 3
Cho đoạn chương trình sau:
s := ‘123456789’;
delete (s, 1, 6);
write(s);
Kết quả in ra màn hình là:
A. ‘6789’
B. ‘789’
C. ‘9’
D. ‘’
Cho đoạn chương trình sau:
s := ‘123456789’;
delete (s, 1, 5);
write(s);
Kết quả in ra màn hình là:
A. ‘6789’
B. ‘789’
C. ‘9’
D. ‘’