viết chương trình nhập vào chu vi hình vuông từ bàn phím. Tính diện tích hình vuông.) lưu ý: dữ liệu nhập vào khai báo kiểu số thực, kết quả làm tròn gồm 1 chữ số thập phân )
2 câu trả lời
uses crt;
var input: real;
begin
clrscr;
readln(input);
writeln((input/4) * (input/4):0:1);
readln;
end.
uses crt;
var a,S:real;
begin
write('nhap chu vi hvg:');readln(a);
S:=(a/4)*(a/4);
writeln('Dien tich hinh vg la:',S);
readln;
end.