THAM KHẢO:

uses crt;

var a,cv,dt:integer;

begin

clrscr;

write('a='); readln(a);

cv:=a*4;

dt:=sqr(a);

if a>0 then

begin

writeln('chu vi hinh vuong la: ',cv);

writeln('dien tich hinh vuong la: ',dt);

end

else writeln('vui long nhap so a lon hon 0');

readln;

end.

                                                                  giải:

                    Diện tích hình vuông là:

                              12x12=144(cm2)

                    Độ dài đáy tam giác là:

                              144x2:12=24(cm)

                                    ĐS:24 cm

diện tích  hình vuông hay hình tam giác là:

       12x12=144(cm2)

 vì chiều cao của tam giác bằng cạnh hình vuông nên chiều cao tam giác là 12 cm

           theo công thức: Độ dài đáy = diện tích tam giác x 2 rồi chia cho chiều cao

                                   Vậy độ dài đáy là:

                                            144x2:12=24(cm)

                                                            đáp số:24cm

Diện tích hình tam giác là :

12 x 12 = 144 ( cm² )

Độ dài đáy hình tam giác là :

144 x 2 : 12 = 24 ( cm )

Đáp số : 24 cm

\(b,\text{PT giao Ox và Oy: }\\ y=0\Leftrightarrow x=\dfrac{3}{2}\Leftrightarrow A\left(\dfrac{3}{2};0\right)\Leftrightarrow OA=\dfrac{3}{2}\\ x=0\Leftrightarrow y=3\Leftrightarrow B\left(0;3\right)\Leftrightarrow OB=3\\ \Leftrightarrow S_{OAB}=\dfrac{1}{2}OA\cdot OB=\dfrac{1}{2}\cdot\dfrac{3}{2}\cdot3=\dfrac{9}{4}\left(cm^2\right)\\ c,C_1:\text{Áp dụng Pytago: }AB=\sqrt{OA^2+OB^2}=\dfrac{3\sqrt{5}}{2}\left(cm\right)\\ C_2:AB=\sqrt{\left(x_A-x_B\right)^2+\left(y_A-y_B\right)^2}=\sqrt{\left(\dfrac{3}{2}-0\right)^2+\left(0-3\right)^2}=\dfrac{3\sqrt{5}}{2}\left(cm\right)\)

độ dài đáy hình tam giác là:

84x10=840

đáp số:840

Độ dài đáy tam giác đó là

  84 x 2 : 10 = 16,8 ( cm )

    Đáp số : 16,8 cm 

Độ dài đáy là 16,8 cm

hộ mk nha!

uses crt;

var

a,b: integer;

begin

clrscr;

write('Nhap so thu nhat: ');readln(a);

write('Nhap so thu hai: ');readln(b);

writeln('Tong ',a,' va ',b,' la: ',a+b);

readln

end.

Câu 1:

Var

cv,s,a:integer;

begin

write('nhap vao canh hinh vuong:');readln(a);

s:=a*a;

cv:=a*4;

Writeln('chu vi hinh vuong la:',cv);

WRiteln('dien tich hinh vuong la:',s);

readln

end.

câu 3:

Var

s,h,a:integer;

begin

write('nhap vao canh hinh vuong:');readln(a);

write('nhap vao chieu cao tuong ung:');readln(h);

s:=(a*h) mod 2;

WRiteln('dien tich hinh vuong la:',s);

readln

end.