Câu1: Viết chương trình tính diện tích hình tròn với bán kính r . Bán kính r là một số tự nhiên nhập từ bàn phím. cần gấp

1 câu trả lời

Program baitap;

Uses crt;

Var r:integer;

Begin

Clrscr;

Write('r='); Readln(r);

Writeln('Dien tich hinh tron:', r*r*3.14:9:2);

Readln

End.