Kiem tra 1 tiet_lan 1_De bai lam tren may tinh

Đề kiểm tra 45 ‘ làm trên máy tính
Câu 1: Cho chương trình sau:
Program CT
Uses crt;
Begin
Clrsrc;
Writeln (Chao cac ban);
Writeln (da den voi);
Writeln (Turbo Pascal);
Readln;
End
Hãy chỉnh sửa chương trình trên để kết quả in ra dong chữ: Chao cac ban da den voi Turbo Pascal.
tên tệp: Cau1_ten_lop.pas (tên và lớp của em) vào thư mục du_lieu ổ đĩa D.
D:du_lieucau1_ten_lop.pas.
Ví dụ : D:du_lieucau1_Quynh_8D.pas
Câu 2: Tìm lỗi và viết lại chương trình sau cho đúng:















tên tệp: Cau2_ten_lop.pas (tên và lớp của em) vào thư mục du_lieu ổ đĩa D.
D:du_lieucau2_ten_lop.pas.
Ví dụ : D:du_lieucau2_Quynh_8D.pas

Câu 3:

chương trình được viết như sau ( Nội dung là nhập 02 số nguyên từ bàn phím in ra màn hình trước và sau khi hoán đổi hai số)

Program hoan_doi;
Var x, y, z: integer;
Begin
Read(x,y);
Writeln(x, ‘ ‘,y);
z:=x;
x:=y;
y:=z;
Writeln(x, ‘ ‘,y);
Readln
End.

Em viết lại chương trình và thêm vào chương trình trên những lệnh nào? để khi nhập và in ra màn hình người sử dụng thấy rõ ràng, minh bạch hơn.

tên tệp: Cau3_ten_lop.pas (tên và lớp của em) vào thư mục du_lieu ổ đĩa D.
D:du_lieucau3_ten_lop.pas.
Ví dụ : D:du_lieucau3_Quynh_8D.pas