viết chương trình free pascal tính chu vi ,diện tích của hình tròn vs bán kính r
K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Những câu hỏi liên quan
LN
29 tháng 11 2021
program chuvi_dientich_hinhtron;
uses crt;
const pi = 3.14;
var R: integer;
cv, dt: real;
begin
clrscr;
writeln; { xuong dong }
readln ( R );
cv:= 2*R*pi;
writeln ( ' chu vi = ' , cv : 8:2 );
dt:=R*R*pi;
writeln ( 'dien tich = ', dt :8:2 );
readln;
end.
Chúc bạn học tốt
KV
15 tháng 5 2023
Var r,s,c:real;
Begin
Write('Ban kinh = ');readln(r);
s:=3.14*r*r;
c:=2*3.14*r;
Writeln('Dien tich la ',s:10:2);
Write('Chu vi la ',c:10:2);
Readln
End.
19 tháng 10 2021
Câu 2:
#include <bits/stdc++.h>
using namespace std;
double a,b,cv,dt;
int main()
{
cin>>a>>b;
cv=(a+b)*2;
dt=a*b;
cout<<"Chu vi la:"<<fixed<<setprecision(2)<<cv<<endl;
cout<<"Dien tich la:"<<fixed<<setprecision(2)<<dt;
return 0;
}
17 tháng 6 2023
program TinhChuViVaDienTichHinhTron;
const
pi: real = 34.4;
var r, chuVi, dienTich: real;
begin
write('Nhap ban kinh cua hinh tron: ');
readln(r);
chuvi := 2 * pi * r;
dientich := pi * sqr(r);
writeln('Chu vi cua hinh tron la: ', chuvi:0:1);
writeln('Dien tich cua hinh tron la: ', dientich:0:1);
end.
1 tháng 1 2022
Chương trình chuvihinhtron_dientichhinhtron;
Sử dụng crt;
Trong đó R: số nguyên;
S, C: thực;
Chòm sao Pi = 3,14;
Bắt đầu
nhân viên văn thư;
Writeln ('R ='); Readln (R);
C: = Pi * 2 * R;
S: = Pi * R * R;
Writeln(‘Chu vi la C= ‘,C);
Writeln(‘Dien tich la S= ‘,S);
Readln
Chấm dứt.
1 tháng 1 2022
#include <bits/stdc++.h>
using namespace std;
double r,cv,dt;
int main()
{
cin>>r;
cv=r*2*pi;
dt=r*r*pi;
cout<<fixed<<setprecsion(2)<<cv<<endl;
cout<<fixed<<setprecsion(2)<<dt;
return 0;
}
TG
12 tháng 12 2020
Program hoc24;
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.
VD
5 tháng 11 2021
uses crt;
var r,cd,cr,s,p: real;
begin
clrscr;
write('Nhap ban kinh: '); readln(r);
cd:=r*2*3.14;
cr:=1/3*cd;
s:=cd*cr;
p:=(cd+cr)*2;
writeln('Dien tich la: ',s);
writeln('Chu vi la: ',p);
readln;
end.
81
1
3 tháng 12 2021
uses crt;
begin
clrscr;
writeln(5*2*pi:4:2);
writeln(5*5*pi:4:2);
readln;
end.
Em đăng câu hỏi đúng bộ môn nhé!