In ra màn hình diện tích và chu vi của hình tròn

221

Tailieumoi.vn biên soạn và giới thiệu bộ câu hỏi Tin học gồm các kiến thức lý thuyết và thực hành, giúp học sinh ôn tập và bổ sung kiến thức cũng như hoàn thành tốt các bài kiểm tra môn Tin học. Mời các bạn đón xem:

In ra màn hình diện tích và chu vi của hình tròn

Câu 38: In ra màn hình diện tích và chu vi của hình tròn.

Lời giải:

Program HINHTRON;

Uses Crt;

Var r,dt,cv:real; 

Begin

  Clrscr;

  Writeln('TINH DIEN TICH & CHU VI HINH TRON:'); 

  Writeln('------------------------------------------------------'); 

  Write ('Nhap ban kinh R=');

  readln(r);

  dt:=pi*r*r;

  cv:=2*pi*r;

  Writeln('Dien tich hinh tron la:',dt:6:2); 

  Writeln('Chu vi hinh tron la:',cv:6:2);

  Readln; 

End.

Đánh giá

0

0 đánh giá