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.C
2.A
4.A
5.A
6.D
7.C
8.A
III.
Program HOC24;
var n,d: integer;
begin
write('Nhap N: '); readln(n);
if n mod 2=1 then
begin
begin
n:=n+1;
write(n,' ');
end;
d:=1;
while d<20 do
begin
n:=n+2;
write(n,' ');
d:=d+1;
end;
end else
begin
d:=1;
while d<=20 do
begin
n:=n+2;
write(n,' ');
d:=d+1;
end;
end;
readln
end.
Câu 1: Trong câu lệnh lặp For i :=1 to 10 do begin .... end ; câu lệnh ghép được bao nhiêu lần ?
A. 20 lần B. 1 lần C. 2 lần D. 10 lần
Câu 2: Tìm giá trị của S trong đoạn chương trình dưới đây ?
S :=1 ;
For i: = 1 to 5 do S := S*i
A. S = 120 B. S = 240 C. S = 24 D. S = 10
Câu 3: Tìm giá trị của S trong đoạn chương trình dưới đây ?
S :=1 :
For i:= 1 to 5 do S := S + 1
A. S = 10 B. S = 16 C. S = 18 D. S = 14
Câu 4: Câu lệnh for i: 1 to 10 do writeln ('A') ; không hợp lệ vì
A. Giá trị đầu cuối không hợp lệ B. Thiếu dấu = ở phép gán giá trị cho biến
C. Thừa dấu : ở phép gán giá trị cho biến D. Không có đáp án nào đúng
Câu 5: Trong câu lệnh lặp For .... to ....do của Pascal , trong mỗi vòng lặp , biến đếm thay đổi thay đổi như thế nào ?
A. + 1 B. + 1 hoặc - 1 C. Một giá trị bất kì
biến i tăng dần từ 1 đến 10
Biến i sẽ tăng mỗi lần 1 đơn vị