viet chuong trinh tính diện tích của hình tròn( 3 bước)
2 câu trả lời
thuật toán
b1: nhập bán kính(r)
b2: gán s:=r*r*Pi;
b3: xuất kết quả và kết thúc thuật toán
uses crt;
var s,r: real;
begin
clrscr;
write ('nhap ban kinh: '); readln (r);
s:=r*r*Pi;
writeln ('Dien tich hinh tron la: ',s);
readln;
end.
Program tron
Uses crt;
Var s,r:real;
Begin
Write('nhap n:');readln(r);
S:=r*r*3.14
Write('dientichhinhtronla:',s:4:2);
Readln
End.
Câu hỏi trong lớp
Xem thêm