viết phuong trình tính chu vi và diên tích của hình vuông với độ dài cạnh là a nhập từ bàn phím
viết phuong trình tính chu vi và diên tích của hình vuông với độ dài cạnh là a nhập từ bàn phím
By Lydia
By Lydia
viết phuong trình tính chu vi và diên tích của hình vuông với độ dài cạnh là a nhập từ bàn phím
Uses crt;
Var p, s, a: real;
Begin
Clrscr;
Write(‘Nhap canh a = ‘); readln(a);
p:=a*4;
s:=sqr(a);
Writeln(‘Chu vi cua hinh vuong la: ‘,p);
Writeln(‘Dien tich cua hinh vuong la: ‘,s);
Readln
end.
Program bai_tap;
Uses crt;
Var a, Cv, S: real;
Begin
Write (‘Nhap canh a=’);
Readln (a);
Cv:= 4*a;
S:= a*a;
Writeln (‘Chu vi hinh vuong la:’, Cv:8:2);
Writeln (‘Dien tich hinh vuong la:’, S:8:2);
Readln
End.