Viết chương trình tính diện tích hình tròn với bán kính (R) nhập vào từ bàn phím. Biết công thức tính diện tích hình tròn: S = pi.R2, trong đó: pi = 3,14.

2 câu trả lời

Program Hinh_tron;
Uses crt;
Var r, S : real;

Const pi = 3.14;
Begin
Clrscr;
Write ('Nhap ban kinh hinh tron: ');Readln (r);
S := r*r*pi;
Writeln('Dien tich hinh tron la :', S:8:2);
Readln
End.

Program bt;

Uses crt;

Var r,S,pi:real;

Begin

pi:=3,14;

Write ('Ban kinh la');

Readln (r);

S:=r*r*pi;

Writeln ('Dien tich la',S);

Readln;

End.

cho mik xin hay nhất nhé

Câu hỏi trong lớp Xem thêm