Viết chương trình nhập vào độ dài cạnh hình vuông, tính và đưa ra màn hình chu vi và diện tích hình vuông (độ dài cạnh hình vuông, chu vi, diện tích l

0 bình luận về “Viết chương trình nhập vào độ dài cạnh hình vuông, tính và đưa ra màn hình chu vi và diện tích hình vuông (độ dài cạnh hình vuông, chu vi, diện tích l”

1. Program tinhoc;

   Uses crt;

   Var a,C,S: real;

   Begin

   clrscr;

   Write(‘ Nhap gia tri cua a: ‘); readln(a);

   C:=a*4;

   S:=a*a;

   Writeln(‘ Chu vi la:’,C:6:2);

   Writeln(‘ Dien tich la:’,S:6:2);

   Readln

   End.

   chcus bạn học tốt

   Bình luận

2. Program BTH;
   uses crt;
   var dai,dt,cv:real;
   Begin
           clrscr;
           write(‘Nhap chieu dai: ‘);readln(dai);
           dt:= sqr(dai);
           cv:=dai*4;
           Writeln(‘Dien tich hinh vuong la: ‘,dt:4:2);
           Writeln(‘CHu vi hinh vuong la: ‘,cv:4:2);
           readln;
   end.

   Bình luận