Viết chương trình tính chu vi hình tròn và bán kính R được lấy từ tệp IN.txt,kết quả tính được in ra màn hìn hình Giúp mình mới ạ
2 câu trả lời
uses crt;
var f:text;
r,p: real;
const Pi=3.14;
begin
clrscr;
assign(f,'IN.txt'); reset(f);
read(f,r);
p:=2*r*Pi;
write('Chu vi hinh tron la: ',p:4:2);
close(f);
readln
end.
program bai_giai;
uses crt;
var f:text;
r:real;
begin
clrscr;
Assign(f,'IN.txt'); reset(f);
readln(f,r);
write('Chu vi hinh tron: ',2*r*3.14:0:3);
readln;
end.
Câu hỏi trong lớp
Xem thêm
