viết chương trình nhập từ bàn phím số a bất kì a>0(là độ dài cạnh hình vuông). Tính diện tích hình vuông đó. Kết quả làm tròn đến 2 chữ số sau phần thập phân.

2 câu trả lời

Program dien_tich;
Uses crt;
Var a,  S : real;
Begin
Clrscr;
Write('Nhap do dai canh a :');readln(a);
S := a*a;
Writeln('Dien tich hinh vuong  la :', S:8:2);
Readln
End.

Program baitap;
Uses crt;
Var a:real;
Begin
Clrscr;
Write('a='); Readln(a);
Writeln('Dien tich:', a*a:5:2);
Readln
End.

_______________________

Đã test code

Câu hỏi trong lớp Xem thêm