viết trương trình tính diện tích hình a (hình28trang 41 sgk) lớp 8 làm trên free pascal
viết chương trình tính diện tích hình A với a,b được nhập từ bàn phím (hình 1.28 sgk trang 41)
C4:viết trương trình tính (có biến nhớ trong chương trình):
a,Diện tích hình chữ nhật.
b,Diện tích hìh tam giác.
b: #include <bits/stdc++.h>
using namespace std;
double a,b,c,p,s;
int main()
{
cin>>a>>b>>c;
p=(a+b+c)/2;
s=sqrt(p*(p-a)*(p-b)*(p-c));
cout<<fixed<<setprecision(2)<<p;
return 0;
}
viết trương trình pascal giải quyết bài toán sau : nhập hai số nguyên a,b in ra màn hình tổng và tích của 2 số nguyên a,b
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ả:
Tính chu vi và diện tích hình tròn. Biết bán kính r =5cm
Làm trên Pascal
uses crt;
begin
clrscr;
writeln(5*2*pi:4:2);
writeln(5*5*pi:4:2);
readln;
end.
Viết chương trình pascal để tính diện tích hình chữ nhật với chiều dài là x, chiều rộng là y.
cái này thì mình ko chắc lắm!
Program Chu_nhat
uses crt;
Var x, y, S;
Begin Write(“Nhap chieu dai:”);
readln(x);
Write(“Nhap chieu rong:”);
readln(y);
S := x*y;
Writeln(“Dien tich hinh chu nhat la:”,S)
readln;
end.
Program HOC24;
var x,y: integer;
s: longint;
begin
write('Nhap chieu dai: '); readln(x);
write('Nhap chieu rong: '); readln(y);
S:=x;
S:=s*y;
write('Dien tich dien hinh chu nhat la: ',s);
readln
end.
Viết chương trình Pascal tính diện tích hình chữ nhật biết chiều dài là x, chiều rộng là y
Program Chu_nhat
uses crt;
Var x, y, S;
Begin Write(“Nhap chieu dai:”);
readln(x);
Write(“Nhap chieu rong:”);
readln(y);
S := x*y;
Writeln(“Dien h hinh chu nhat la:”,S)
readln;
end.
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.