Nhập chương trình sau và sửa lỗi sao cho đúng:

----- Nội dung dịch tự động từ ảnh -----
ĐỂ BÀI:
Câu 1(3đ): Nhập chương trình sau và sửa lỗi sao cho đúng:
Var a, b, tg : interger
begin
a = 5; b = 7;
Write (Truoc khi doi gia tri: );
Write(' a =', a,', b=' , b);<br />tg = a;<br />a = b;<br />b: = tg;<br />Write ( 'sau khi doi gia tri ');
Write(' a =', a, ', b=' , b);
Readln;
End.
Câu 2(3đ): Viết một chương trình Pascal hoàn chinh để tỉnh diện tích một hình
chữ nhật, trong đó số đo hai cạnh được nhập vào từ bàn phím.
Câu 3(4đ – đề dành cho hs lớp 8A): Viết một chương trình Pascal hoàn chỉnh để
tính giá trị của biểu thức sau, trong đó giá trị của hai số x, y được nhập vào từ bàn
phím.