Program HINH_CHU_NHAT;
Uses Crt;
Var a,b,s,c: real;
Begin
Clrscr;
Writeln(‘ TINH DIEN TICH & CHU VI HINH CHU NHAT:’);
Writeln(‘--------------------------------------------------------------‘); (2)
Write('Nhap chieu dai='); readln(a);
Write('Nhap chieu rong='); readln(b);
s:=a*b;
c:=(a+b)*2;
Writeln('Dien tich hinh chu nhat la:’,s:6:2);
Writeln('Chu vi hinh chu nhat:',c:6:2); (3)
Readln;
End.
Mọi người cho em hỏi là vì sáo đoạn (2) lại viết thêm như thế ạ và có dùng lệnh write thay thế được không ạ?
Đoạn (3) vì sao lại có c:6:2 thế ạ?
Loga
Sinh Học lớp 12
