Viết chương trình tin học 8
a) tính chu vi hình chữ nhật
b) tính diện tích hình chữ nhật
Var S, P, a,b : real;
Begin
Write ( 'nhap chieu dai:' ); Readln (a);
Write ( 'nhap chieu rong:' ); Readln (b);
P:= (a+b): 2;
S:= a*b;
Writeln (' Chu vi là:', P);
Writeln (' Dien tich là:', S);
Readln;
End.
Học lâu rồi nên ko nhớ lắm, 2 câu gộp lại 1 cái luôn, em tự tách ra nha