Cho mình hỏi mình làm thế này đúng chưa ạ Nếu sai sửa cho mình nhé : Đề: Viết chương trình tính diện tích hình chữ nhật : Bài làm : var a,b : Real ; Begin Writeln ('Nhap do dai chieu rong'); Readln (a); Writeln ('Nhap do dai chieu dai'); Realn(b); S=a*b Readln End.

1)       var a,b : Real ;
2)       Begin
3)       Writeln ('Nhap do dai chieu rong');
4)       Readln (a);
5)       Writeln ('Nhap do dai chieu dai');
6)       Realn(b);
7)       S=a*b;

8)
9)       Readln
10)     End.

* Lỗi sai :

Dòng 1 : chưa khai báo biến S;

Dong 6 : ghi sai realn

Dòng 7 : sau câu lệnh gán thiếu chấm phẩy, dấu gán sai :=

Dòng 8 : thiếu câu lệnh in giá trị S ra màn hình

* Sửa

var a, b, S : Real ;

Begin

Writeln ('Nhap do dai chieu rong'); Readln (a);

Writeln ('Nhap do dai chieu dai'); Readln(b);

S :=a*b ;

Writeln('dien tich hinh chu nhat la :', S);

Readln

End.