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.
![](https://rs.olm.vn/images/avt/0.png?1311)
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.
![](https://rs.olm.vn/images/avt/0.png?1311)
Câu 13 : Câu lệnh pascal nào sau đây là hợp lệ?
A. For i=1 to 10 do writeln(‘A’) | B. For i : = 1 to 10 do writeln(‘A’); |
C. For i:=5 to 30 do; writeln(‘A’) | D. For i:= 10 to 1 do writeln(‘A’); |
![](https://rs.olm.vn/images/avt/0.png?1311)
c) Không hợp lệ vì lệnh gán phải kí hiệu là := chứ không phải =
d) Không hợp lệ vì sau từ khóa do không được phép có dấu chấm phấy ;
e) Không hợp lệ, vì không x phải khai báo số nguyên !
a) ko. vì giá trị đầu lớn hơn giá trị cuối
b) ko. vì giá trị đầu và giá trị cuối ko phải là giá trị nguyên
c) ko. vì sau biến đếm i thiếu dấu (:)
d) ko. vì sau DO có dấu (;)
e) ko. vì x ko khai báo số nguyên
![](https://rs.olm.vn/images/avt/0.png?1311)
a: Không hợp lệ
Sửa lại: for i:=50 downto 10 do writeln('A');
b: Không hợp lệ
Sửa lại: for i:=1 to 5 do writeln('A');
c: Không hợp lệ
x:=3;
while x<=3 do
x:=x+1;
d: Không hợp lệ
Sửa lại: x:=5;
while x<=5 do
x:=x+2;
Đáp án C