22. Cho hình vuông ABCD biết cạnh của Hình vuông = a . Tính diện tích hình vuông ABCD a) MÔ tả thuật toán b) viết chương trình tính diện tích hình

a/

thuật toán:

 b1: nhập cạnh hình vuông writeln (‘nhap canh: ‘);   readln (a);

 b2: gán s:=a*a;

 b3: in kết quả ra màn hình writeln (‘dien tich hinh vuong la: ‘,s);

b/

 chương trình:

uses crt;

var a,s: integer;

begin

 clrscr;

   write (‘nhap canh: ‘);   readln (a);

   s:=a*a;

   writeln (‘dien tich hinh vuong la: ‘,s);

 readln;

end.

꧁༺cao thủ Pascal✔