Question

Hãy liệt kê các lỗi (nếu có) trong chương trình Pascal dưới đây và sửa lại cho đúng:

program dientich;
Const Pi:=3.1416;
var cv,dt : integer ;
 r : real;
begin 
r:=5.5;
cv:=2*pi;
dt :=pi*r*r ;
writeln ('chu vi la',cv)
writeln ('dien tich la',dt)
readln 
end.

Answer 1

Lỗi

Answer 2

lỗi r

Answer 3

mik sửa lại r đó 

Answer 4

Mình sửa trực tiếp và bôi đen chỗ thêm hoặc sửa lại nha bạn! 

program dientich;

use crt;

const Pi = 3.1416;

var cv, dientich: integer;

r: real;

begin

clrscr; ( lệnh này bạn muốn thêm cũng được mà ko thì cx đc nha! Tại vì cái này dùng để xóa màn hình nhìn đẹp hơn thôi ak ^^ )

r:=5.5;
cv:= 2*r *pi;
dt :=pi*r*r ;
writeln ('chu vi la',cv);
writeln ('dien tich la',dt);
readln 
end.