viết chương trình free pascal
tính chu vi ,diện tích hình tron
điều kiện R=0
R<0
R>0
viết chương trình Pascal:
-tính chu vi và diện tích hình tròn.
-kiểm tra chương trình với các biến của bán kính R lần lượt như sau 5,20,10,5,300.
giúp mình với ạ
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.
CHƯƠNG TRÌNH TÍNH CHU VI VÀ DIỆN TÍCH HÌNH TRÒN, BIẾT RẰNG R LÀ BÁN KÍNH ĐƯỜNG TRÒN VÀ ĐƯỢC NHẬP VÀO TỪ BÀN PHÍM. CHUVI:=2*PI*R; DIENTICH:=PI*R
Viết giùm em Pascal vs ạ=>>
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
Viết chương trình tính diện tích và chu vi tam giác trong pascal
Program Hinh_Tamgiac_Program;
Uses crt;
Var a,b,c,s,p : real;
Begin
Clrscr;
Writeln(‘HINH TAM GIAC:’);
Write(‘nhap a =’);readln(a);
Write (‘nhap b =’);readln(b); Write(‘nhap c =’);readln(c);
If ((a+b)>c)and((b+c)>a)and((a+c)>b) then
Begin
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c)); Writeln(‘Chu vi tam giac:’,2*p:4:2) ; Writeln(‘Dien tich tam giac:’,s:4:2);
End
Else
Writeln(a,’, ‘, b,’, ‘, c, ‘ khong phai la ba canh cua tam giac’) ;
Readln;
End.
Viết chương trình tính diện tích và chu vi hình chữ nhật. Với độ dài các cạnh nhập từ bàn phím.Biết : Diện tích = a*b, Chu vi = (a + b)*2;
3. Viết chương trình tính chu vi, diện tích của hình tròn với bán kính được nhập vào từ bàn phím ? C :=R*2*3.14 ; S := (R*R*3,14) ;
Giúp mình với ạ , gấp lắm xin cảm ơn trước ạ
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;
}
1 ) Viết chương trình tính diện tích và chu vi hình chữ nhật , với chiều dài và chiều rộng được nhập từ bàn phím 2 ) Viết chương trình tính diện tích và chu vi hình vuông , với cạnh được nhập từ bàn phím 3 ) Viết chương trình tính diện tích và chu vi tam giác , với độ dài ba cạnh và chiều cao tương ứng với cạnh đó và được nhập từ bàn phím bàn phím 4 ) Viết chương trình tính diện tích và chu vi hình tròn , với bán kính được nhập từ Yêu cầu : Viết công thức tính diện tích và chu vi của các hình vào vở Viết chương trình vào vở và làm trên phần mềm Python
Xác định bài toán, mô tả thuật toán và viết chương trình để tính chu vi và diện tích của hình vuông cạnh a (với a là số nguyên) trong phần mềm pascal
uses crt;
var a:integer;
begin
clrscr;
readln(a);
writeln(a*4);
writeln(a*a);
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, với r được nhập từ bàn phím.
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.
#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;
}
viết chương trình pascal tính diện tích và chu vi của hình chữ nhật, làm tròn 2 chữ số thập phân. biết chiều dài và chiều rộng của hình chữ nhật là 2 số thực được nhập từ bàn phím
uses crt;
var a,b:real;
begin
clrscr;
readln(a,b);
writeln(2*(a+b):4:2);
writeln(a*b:4:2);
readln;
end.
viết chương trình pascal tính diện tích và chu vi hình chữ nhật, làm tròn 2 chữ số thập phân . biết chiều dài và chiều rộng của hình chữ nhật là 2 số thực được nhập vào từ bàn phím
Program Chu_nhat; uses crt;
Var a, b, S, CV: real;
Begin
Write('Nhap chieu dai:'); readln(a);
Write('Nhap chieu rong:'); readln(b);
S := a*b;
CV := (a+b)*2;
Writeln('Dien tich hinh chu nhat la:',S:3:2);
Writeln('Chu vi hinh chu nhat la:',CV:3:2);
readln;
end.
Program chunhat;
uses crt;
var a,b,p,s:real;
begin
clrscr;
writeln('Nhap chieu dai va rong cua hinh chu nhat: ');
readln(a,b);
s:=a*b;
p:=(a+b)*2;
write('Chu vi hinh chu nhat la: ', p:1:2);
writeln;
write('Dien tich hinh chu nhat la: ', s:1:2);
readln;
end.
Kết quả: