HÃY VIẾT LẠI CHƯƠNG TRÌNH SAU CHO ĐÚNG.(3Đ)CONST PI

Câu 4: Hãy viết lại chương trình sau cho đúng.(3đ)

Const pi:=3,14; ...

Var cv, dt: integer; ...

r: real; ...

Begin ...

r=5.5; ...

cv=2*pi*r; ...

dt:=pi*r*r; ...

Writeln(‘chu vi là:=cv’); ...

Writeln(‘dien tich la:’,dt); ...

Readln ...

End. ...

...