Question

[Thu Phương]

Hãy sắp xếp các lệnh sau để thành một chương trình hoàn chỉnh End. End; Readln; Begin Readln(f,i); Close(f); Var f:text; i: byte; writeln(i); Assign(f,'D:/so.txt'); Reset(f); While not(eof(f)) Do Begin

Answer 1

[Minh Lệ]

Thứ tự sắp xếp

12. End.

8. End;

11. Readln;

2. Begin

7. Readln(f,i);

9. Close(f);

1. Var f:text; i: byte;

10. writeln(i);

3. Assign(f,'D:/so.txt');

4. Reset(f);

5. While not(eof(f)) Do

6. Begin