câu 1:
- sau integer, số 60, số 5, x/y bạn thiếu dấu chấm phải
- sau writeln bạn cần ghi thêm đáp án cần xuất ra màn hình và sau đó là dấu chấm phải
- bạn thiếu dòng "readln" trên dòng end để dừng lại chương trình xem kết quả
- thiếu dấu "." sau chữ end để kết thúc chương trình
câu 2
*Xác định bài toán*
Input: Hệ số a,b
Output: Diện tích hình chữ nhật
*Mô tả thuật toán*:
B1: Nhập a,b
B2: S <-- a*b
B3: Thông báo kết quả và kết thúc thuật toán
Viết chương trình:
uses crt;
var a,b,S:integer;
begin
clrscr;
write('nhap a:'); readln(a);
write('nhap b:'); readln(b);
S:=a*b;
write('Dien tich Hcn = ',S);
readln
end.