Viết chương trình tính chu vi diện tích hình tròn có bán kính r được nhập từ bàn phím

Program De _ 1 ; 

Uses crt ; 

Const Pi = 3.14 ; 

Var     r : interger ; 

Begin 

          Clrscr

           Writeln [' Hay nhap ban kinh '] ;                                readln [r ] ; 

           cv : =2*r*Pi ;

           dt : = r * r * Pi ;

           Readnl 

End . 

Bài 3: Viết chương trình tính chu vi và diện tích của hình tròn có bán kính r [được nhập vào từ bàn phím]. Code c: #include #include #include #define PI 3.14159 int main[] {             int r;             float chuvi, dientich;             printf["Nhap ban kinh r:"];             scanf["%d", &r];             chuvi = 2*PI*r;             dientich = PI*r*r;             printf["Chu vi hinh tron la: %f\n", chuvi];             printf["Dien tich hinh tron la: %f", dientich];             getch[]; }

Yêu cầu: Viết chương trình tính chu vi và diện tích hình tròn có bán kính cho trước.

• Input: Nhập bán kính đường tròn từ bàn phím
• Output: In ra màn hình diện tính đường tròn

Bước 1. Nhập thông tin;
Bước 2. Xử lý:

• Bước 2.1. Chu vi = 2 * Pi * R;
• Bước 2.2. Diện tích = Pi * R * R;

Bước 3. Xuất dữ liệu ra màn hình chu vi và diện tích.

program cv_dt_hinh_tron; uses crt; const PI = 3.14; var bankinh, chuvi, dientich: real; begin write['Nhap ban kinh hinh tron: ']; readln[bankinh]; chuvi := 2 * PI * bankinh; dientich := PI * bankinh * bankinh; writeln['Chu vi hinh tron: ', chuvi:1:1]; writeln['Dien tich hinh tron: ', dientich:1:1]; readln; end. Dong codeÝ nghĩa program cv_dt_hinh_tron; Khai báo tên chương trình cv_dt_hinh_tron uses crt; Khai báo các hàm thư viện const PI = 3.14; Khai báo biến hằng PI = 3.14. Mục đích nếu PI sử dụng nhiều trong code thì ta chỉ cần thay đổi giá trị tại khai báo không cần thay đổi tất cả các giá trị của PI bên trong code var bankinh, chuvi, dientich: real; Khai báo các biến cần sử dụng trong chương trình bankinh[bán kính], chuvi[ chu vi], dientich[ diện tích] với kiểu real[ số thực] write['Nhap ban kinh hinh tron: ']; In ra màn hình dòng Nhap ban kinh hinh tron: readln[bankinh]; Nhập từ bàn phím để gán giá trị cho biến bankinh chuvi := 2 * PI * bankinh; Gán giá trị cho biến chuvi bằng công thức tính chu vi \[cv = 2\pi R\] dientich := PI * bankinh * bankinh; Gán giá trị cho biến dientich bằng công thức tính diện tích \[S = \pi {R^2}\] writeln['Chu vi hinh tron: ', chuvi:1:1]; In ra màn hình dòng chữ Chu vi hinh tron: và in giá trị của biến chuvi ra màn hình writeln['Dien tich hinh tron: ', dientich:1:1]; In ra màn hình dòng chữ Dien tich hinh tron: và in giá trị của biến dientich ra màn hình readln; Dừng màn hình khi chạy chương trình cho bạn xem.

 Kết luận: Chúng ta thấy việc lập trình cho bài này chúng ta cần nhớ hai công thức là tính diện tích và chu vi của hình tròn. Do đó, chúng ta cần trang bị một ít kiến thức về toán học nhé! ● \[cv = 2\pi R\] ● \[S = \pi {R^2}\]

với R là bán kính đường tròn

Bạn đang xem: [Pascal] Nhập Vào Bán Kính Của Hình Tròn Tại Lingocard.vn

Tất cả Lớp 12 Lớp 11 Lớp 10 Lớp 9 Lớp 8 Lớp 7 Lớp 6 Lớp 5 Lớp 4 Lớp 3 Lớp 2 Lớp 1

1. Viết chương trình tính diện tích và chu vi của hình tròn biết bán kính r nhập vào từ bàn phímĐANG CẦN GẤP HELP MEE

Program lingocard.vn;

Uses crt;

Var r,S,C:real;

Begin

Write ['Ban kinh la'];

Readln [r];

S:=r*r*3.14;

C:=r*2*3.14;

Writeln ['Chu vi la',C];

Writeln ['Dien tich la',S];

Readln;

End.

Đang xem: Nhập vào bán kính của hình tròn in ra màn hình diện tích và chu vi của nó

uses crt;

var r,cv,dt:real;

begin

clrscr;

repeat

write['Nhap ban kinh:'];readln[r];

until r>0;

cv:=r*2*pi;

dt:=sqr[r]*pi;

writeln['Chu vi=',cv:4:2];

writeln['Dien tich=',dt:4:2];

readln;

end.

Viết chương trình tính chu vi và diện tích hình tròn bán kính R, biết rằng R là số thực và được nhập vào từ bàn phím, biết hằng số Pi có giá trị = 3.14

[Chu vi = 2.Pi.R, Diện tích = Pi.R2 là các số thực].

bài 1 : Viết chương trình tính diện tích, chu vi hình chữ nhật biết độ dài các cạnh của hình chữ nhật là các số dương được nhập từ bàn phím.In ra màn hình điện tích của chu vi của nó

Bài 2: Viết chương trình tính diện tích và chu vi của hình tròn biết bán kính của hình tròn là số dương được nhập từ bàn phím.

[ Help meeeeeeeee!!!!!!!!!!!!!! lưu ý, giải câu nào cx đc ạ, 2 câu thì mik càng cảm ơn ^^]

CÂU 1:

program hinhchunhat;

var a,b,S,C: real;

begin

Write[“Nhapdodaicanhthuchata=”];readln[a];

Write[“Nhapdodaicanhthuhaib=”];readln[b];

S:= a*b;

C:=[a+b]*2;

Writeln[“Dientichhinhchunhatla:”,S];

Writeln[“Chuvihinhchunhatla:”,C];

readln

end.

CHÚC BẠN HỌC TỐT!

CÂU 2:[lưu ý: câu này thì mik viết chương trình với bán kính hình tròn là sớ thực được nhập từ bàn phím còn số dương thì bn tự tìm hiểu nhe. nếu tìm hiểu đc thì bn chỉ cần thay phần khai báo var thôi nhe.]

program hinhtron;

var r:real;

const pi=3.14;

begin

clrscr;

Write[“Nhapbankinh:”];readln[r];

Writeln[“Chuvihinhtronla:”,2*pi*r];

Writeln[“Dientichhinhtronla:”,pi*r*r];

readln

end.

CHÚC BẠN HỌC TỐT [x2]

B1:Biết chiều dài và chiều rộng của hình chữ nhật.

B2:Lấy chiều dài nhân rộng.

B3:Viết đáp số.

B4:Viết chương trình và kết thúc thuật toán.

Viết chương trình tính diện tích của một hình tam giác, biết rằng chiều cao h và cạnh đáy a là các số thực và được nhập vào từ bàn phím.

Xem thêm: Bộ Tài Liệu Tin Học Văn Phòng Excel, Powerpoint,, Bộ Tài Liệu Tự Học Microsoft Excel Bao Gồm

[Diện tích = [cạnh đáy* chiều cao]/2].

câu 1 em hãy sử dụng công thức hê-rông lập chương trình tính và hiển thị ra màn hình máy tính diện tích hình tam giác với chiều dài 3 canh a,b,c được nhập từ bàn phím [lưu ý dùng p=[a+b+c]/2]

câu 2 hãy lập chương trình nhập từ bàn phím một dãy số nguyên n phần tử [với n

Câu 1:

uses crt;

var a,b,c,p,s:real;

begin

clrscr;

repeat

write['Nhap a=']; readln[a];

write['Nhap b=']; readln[b];

write['Nhap c=']; readln[c];

until [a>0] and [b>0] and [c>0];

if [a+b>c] and [a+c>b] and [b+c>a] then

begin

p:=[a+b+c]/2;

s:=sqrt[p*[p-a]*[p-b]*[p-c]];

writeln['Dien tich tam giac la: ',s:4:2];

end

else writeln['Day khong la ba canh trong mot tam giac'];

readln;

end.

Câu 2:

uses crt;

var a:arrayof integer;

i,n,t,max,min:integer;

begin

clrscr;

write['Nhap n=']; readln[n];

for i:=1 to n do

begin

write['A=']; readln[a];

end;

t:=0;

for i:=1 to n do

t:=t+a;

writeln['Tong cac phan tu trong day la: ',t];

max:=a;

min:=a;

for i:=1 to n do

begin

if maxa then min:=a;

end;

writeln['Gia tri lon nhat la: ',max];

writeln['Gia tri nho nhat la: ',min];

readln;

end.

Đúng 1
Bình luận [1]

viết chương trình tính chu vi, diên tích hình vuông với cạnh a được nhập vào từ bàn phím.❤✿

mn giúp em với ạ T4 em thi rồi!!! Lớp 8 Tin học Lập trình đơn giản 3 1

Gửi Hủy