xây dựng thuật toán và viết chương trình tính diện tích ( S) hình cầu biết rằng bán kính (R )của hình cầu được nhập từ bàn phím cho biết, :S=4*pi*sqrt

0 bình luận về “xây dựng thuật toán và viết chương trình tính diện tích ( S) hình cầu biết rằng bán kính (R )của hình cầu được nhập từ bàn phím cho biết, :S=4*pi*sqrt”

1. thuật toán:

   b1: nhập bán kính (r)

   b2: gán s:=r*r*Pi;  (Pi có sẵn trong pascal)

   b3: in kết quả ra màn hình

   chương trình:

   uses crt;

   var r,s: real;

   begin

   clrscr;

   write (‘nhap r: ‘);  readln (r);

   s:=r*r*Pi;

   writeln (‘dien tich hinh tron la: ‘,s);

   readln;

   end.

   Trả lời