

Hãy luôn nhớ cảm ơn và vote 5*
nếu câu trả lời hữu ích nhé!
Program KT_Bai2;
uses crt;
var r:integer;
S: real;
const pi=3,14;
Begin
Clrscr;
Writeln('Ban kinh hinh tron la');
Readln(r);
S:=r*r*pi
Writeln('Dien tich hinh tron la',S);
Readln
End.
*Lưu ý:
- Phần in đậm: là phần sửa
- Sau readln không có dấu phẩy
Hãy giúp mọi người biết câu trả lời này thế nào?
Bạn sửa lại như này ik, sẽ thấy điều dịu kì =))
#Duahauvn
Hãy giúp mọi người biết câu trả lời này thế nào?
Bảng tin
693
33816
576
Mong bạn Vote mình 5 sao là chọn ctlhn ạ
364
7379
190
ảo thật đấy bạn, trong trường hợp cho r là số thực thì sao ạ, readln dòng cuối ko có dấu ; ko liên quan nha.
693
33816
576
có dấu ; là nó báo lỗi luôn,
364
7379
190
=)) bạn lm lại coi
693
33816
576
mik thử rồi nhưng nó vẫn báo lỗi
364
7379
190
ảo thật đấy, bao nhiêu CT mik mik vẫn lm vậy mà =))
364
7379
190
mik thường hay để ; để phòng trường hợp sửa code mà bị thiếu ;
693
33816
576
ảo thật đấy