Viết chương trình tính chu vi, diện tích hình vuông có cạnh a (được nhập từ bàn phím).

0 bình luận về “Viết chương trình tính chu vi, diện tích hình vuông có cạnh a (được nhập từ bàn phím).”

1. Program chuvidientichhv

   Uses Crt;

   Var a : real;

   Begin

   clrscr;

   Write (‘Nhap canh a cua hinh vuong: ‘); readln(a);

   Writeln(‘Chu vi cua hinh vuong da cho la: ‘, a*4);

   Writeln(‘Dien tich hinh vuong da cho la:’, a*a);

   Readln;

   End.

   Bình luận

2. uses crt;

   var a,p,s: real;

   begin

   clrscr;

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

   p:=a*4;

   s:=a*a;

   writeln (‘chu vi: ‘,p:1:2);

   writeln (‘dien tich: ‘,s:1:2);

   readln;

   end.

   Bình luận