B1: Viết chương trình tính diện tích hình bán nguyệt ( 1 nx hình tròn ) bik K là số nghuyên đc nhập từ bàn phím kết quả lấy hai chữ số thập phân sau d

0 bình luận về “B1: Viết chương trình tính diện tích hình bán nguyệt ( 1 nx hình tròn ) bik K là số nghuyên đc nhập từ bàn phím kết quả lấy hai chữ số thập phân sau d”

1. uses crt;

   var r,K: integer;

   begin

          clrscr;

          writeln(‘nhap r’); readln(K);

          K:=(3,14*r*r)/2;

          writeln (‘Dien tich hinh ban nguyet la ‘, K:10:2);

          readln;

   end.

   Bình luận