Một thửa ruộng hình tam giác có diện tích 180m2. Tính chiều dài cạnh đáy thửa ruộng, biết rằng nếu tăng cạnh đáy lên 4m và chiều cao tương ứng giảm đi 1m thì diện tích không thay đổi.

C1.Trong hệ bài tiết nước tiểu,ống dẫn nước tiểu nối liền bể thận với

A.cầu thận                                                            C.ống góp

B.bóng đái                                                             D.ống dái

C2.Ở người,thiếu loại muối khoáng nào sẽ dẫn tới hiện tượng co cứng,hiện tượng chuột rút,có thể gây tử vong trong trường hợp co cứng các cơ hô hấp

A.canxi                                                                  C.sắt

B.photpho                                                              D.kẽm

cho 2 số thực a,b.Hãy ghi kết quả ss hai số đó.

input:

output:

-Mô tả thuật toán:

B1:

B2:

B3:

cho trước 3 số dương a,b và c.Hãy mô tả thuật toán cho biết 3 số đó có thể là độ dài 3 cạnh của một tam giác hay không.
Input:

Output:

-Thuật toán ba số có là một cạnh của tam giác:

B1:
B2:

B3:kết thúc thuật toán

-Viết ct:

Program

Uses crt;

Var

Begin

     Clrscr;

End.

Đổi giá trị 2 biến x và y.
Input:
Output:

-Mô tả thuật toán:
B1:
B2:
B3:

-Viết ct:

Program

Use crt;

Var

Begin

     Clrscr;

End.

Viết ct tính điểm tb của 3 môn Toán,Lý,Tin.Biết điểm môn Toán có hệ số 2 và điểm của cả ba môn là số nguyên dương.

Progam .......................;

Uses crt;

Var toan,Ly,Tin : ............;

    DTB:......................;

BEGIN 

      Clrscr;

       .....('nhap diem toan=');Readln(................);

       ...............................................;

       ................................................;

       DTB....................(.................................)/4;

       Write('Diem trung binh 3 mon la; ' , DTB....................);

       Readln;

END.

Hoàn thành  CT Pascal (có sd biến nhớ) để tính chu vi của hcn.(Biết chi vi hcn bằng (dài+rộng).2;chiều dài và rộng là 2 số nguyên được nhập từ bàn phím).

Program ...................................;

Var ............................................;

Begin

      Write(..................................................);

       ........................(chieudai);

        ........................('Nhap chieu rong cua hinh chu nhat la:');

        Readln(..............);

        Write('Chu vi hinh chu nhat la:' ,.........................................);

         .................................

End.