viết ngon ngữ pascal để gải pt đó
nhập từ bàn phím số đo một cạnh hình vuông
hiện ra màn hình chu vi và diện tích của hình đó
viết ngon ngữ pascal để gải pt đó
nhập từ bàn phím số đo một cạnh hình vuông
hiện ra màn hình chu vi và diện tích của hình đó
mình chỉ viết phần thân thôi nha!
write(‘nhap so do mot canh hinh vuong: ‘);
readln(x);
CV:=4*x;
DT:=x*x;
writeln(‘chu vi hinh vuong la: ‘,CV);
writeln(‘dien tinh hinh vuong la: ‘,DT);
program hinh_vuong;
use crt;
var a, C, S: real;
begin
clrscr;
write (‘so do canh hinh vuong la: ‘);
readln (a);
C:= a*4;
S:= a*a;
write (‘chu vi hinh vuong C: ‘);
write (‘dien tich hinh vuong S: ‘);
readln
end.