Bài 16: Ví dụ làm việc với tệp

Trong mặt phẳng hệ tọa độ Descartes vuông góc, cho 2 điểm M(x1,y1) và N(x2,y2). Hãy viết câu lệnh tính khoảng cách d từ điểm M đến N:

1. d := sqrt(sqr(x1 – x2) + sqr(y1 – y2));
2. d := sqr(sqrt(x1 – x2) + sqrt(y1 – y2)); 
3. d := sqrt(sqr(x1 + x2) – sqr(y1 + y2));
4. d := sqr(sqrt(x1 + x2) – sqrt(y1 + y2));

Trong mặt phẳng hệ tọa độ Descartes vuông góc, cho điểm M(x, y). Hãy viết câu lệnh tính khoảng cách d từ điểm M đến gốc tọa độ O:

1.  := sqr(x*x + y*y);
2. d := sqrt(sqr(x) + sqr(y));
3. d := sqr(x*x – y*y); 
4. d := sqr(sqrt(x) + sqrt(y));

Cho biết f1 là biến tệp văn bản và tệp ketqua.txt có nội dung đang lưu trữ là: Tich 2 so la: 20. Hãy cho biết sau khi thực hiện đoạn lệnh sau: a := 10; b :=2;  assign(f1, 'ketqua.txt'); rewrite(f1); writeln(f1, 'Thuong 2 so la: ', a/b); thì tệp ketqua.txt có nội dung gì? 

1. Tich 2 so la: 20
2. Tich 2 so la: 20Thuong 2 so la: 5
3. Thuong 2 so la: 5
4. Thuong 2 so la: 5Tich 2 so la: 20