Tính chu vi và diện tích hình vuông biết cạnh là 1 số nguyên nhập từ bàn phím.
2 câu trả lời
Program dien_tich;
Uses crt;
Var a, dt, cv : integer;
Begin
Clrscr;
Write('Nhap do dai canh hinh vuong :');readln(a);
cv := a*4;
dt := a*a;
Writeln('Chu vi hinh vuong la :', cv);
Writeln('Dien tich hinh vuong la :', dt);
Readln
End.
Program baitap;
Uses crt;
Var a:integer;
Begin
Clrscr;
Write('Nhap do dai 1 canh:');
Readln(a);
Writeln('Chu vi hinh vuong:',a*4);
Writeln('Dien tich hinh vuong:',a*a);
Readln
End.
Câu hỏi trong lớp
Xem thêm