-
Câu hỏi:
Cho đoạn chương trình sau:
Var g:text;
I:integer;
Begin
Assign(g, ‘C:\DLA.txt’);
Rewrite(g);
For i:=1 to 10 do
If i mod 2 <> 0 then write(g, i);
Close(g);
Readln
End.
-
A.
2; 4; 6; 8;10
-
B.
1; 3; 5; 9
-
C.
1; 3; 5;7; 9
-
D.
4; 6; 8;10
Lời giải tham khảo:
Đáp án đúng: C
Hãy trả lời câu hỏi trước khi xem đáp án và lời giải -
A.
Câu hỏi này thuộc đề thi trắc nghiệm dưới đây, bấm vào Bắt đầu thi để làm toàn bài
CÂU HỎI KHÁC
- Khẳng định nào sau đây là đúng nhất?
- Để biết con trỏ tệp đã ở cuối dòng của tệp f hay chưa, ta sử dụng hàm:
- Điều khẳng định nào sau đây là đúng?
- Trong NNLT Pascal, khai báo nào sau đây là đúng khi khai báo tệp văn bản?
- Giả sử trên thư mục gốc của đĩa C có tệp f đã có nội dung sẵn. Khi thực hiện thủ tục Rewrite(f);
- Câu lệnh dùng thủ tục đọc có dạng:
- Cho đoạn chương trình sau:Var g:text;I:integer;BeginAssign(g, ‘C:DLA.
- Tệp f có dữ liệu [5 9 15] để đọc 3 giá trị trên từ tệp f và ghi các giá trị này vào 3 biến x, y, z ta sử d
- Giả sử a = 5; b = 9; c = 15; để ghi các giá trị trên vào tệp f có dạng là [5 9 15] ta sử dụng thủ tục ghi:
- Khẳng định nào sau đây là chính xác?
- Cho chương trình sauProgram Baitap;Var x, y, z , t: word;Function BCNN(a, b:word):word;Var du, c, d:word;Beginc:=a; d:=b;While b
- Cho mảng A gồm N phần tử thuộc kiểu nguyên (N≤50)? Viết chương trình con thực hiện các yêu cầu sau: Viết thủ tục