Bài 1 :

uses crt;

var a, b, c, cv : integer; 

begin

clrscr;

write('nhap ba canh a, b, c :');readln(a, b, c);

cv := (a + b + c) ;

writeln('chu vi tam giac :', cv);

readln

end.

Bài 2 :

uses crt;

var a, h: integer; s : real;

begin

clrscr;

write('nhap canh a va chieu cao h :');readln(a, h);

s := (a * h) / 2;

writeln('dien tich tam giac :', s:3:1);

readln

end.

Bài 3 :

uses crt;

var a, b, s : integer; 

begin

clrscr;

write('nhap chieu dai va chieu rong :');readln(a, b);

s := a * b;

writeln('dien tich hinh chu nhat :', s);

readln

end.

Câu a

a=float(input("Nhập vào cạnh a: "))
b=float(input("Nhập vào cạnh b: "))
c=float(input("Nhập vào cạnh c: "))
if (a+b>c) & (b+c>a) & (a+c>b) & (a>0) & (b>0) & (c>0):
    if (a==b)&(b==c):
        print ("\nĐây là tam giác đều")
    elif (a==b)& (a!=c) | (a==c)&(a!=b) | (b==c) & (b!=a):
            print ("\nĐây là tam giác cân")
    elif (a*a==b*b+c*c)|(b*b==a*a+c*c)|(c*c==a*a+b*b):
            print("\nĐây là tam giác vuông")
    else:
        print("\nĐây là tam giác thường")
    import math
    cv=a+b+c
    p=cv/2
    dt=math.sqrt(p*(p-a)*(p-b)*(p-c))
    print ("\nChu vi tam giác: ",round(cv,2))
else:
        print ("\nKhông Tạo Thành Tam Giác")
print (gach)
print ("Thank You ")

Câu b:

a=float(input("Nhập vào cạnh a: "))
b=float(input("Nhập vào cạnh b: "))
c=float(input("Nhập vào cạnh c: "))

if (a+b>c) & (b+c>a) & (a+c>b) & (a>0) & (b>0) & (c>0):
    if (a==b)&(b==c):
        print ("\nĐây là tam giác đều")
    elif (a==b)& (a!=c) | (a==c)&(a!=b) | (b==c) & (b!=a):
            print ("\nĐây là tam giác cân")
    elif (a*a==b*b+c*c)|(b*b==a*a+c*c)|(c*c==a*a+b*b):
            print("\nĐây là tam giác vuông")
    else:
        print("\nĐây là tam giác thường")
    import math
    cv=a+b+c
    p=cv/2
    dt=math.sqrt(p*(p-a)*(p-b)*(p-c))
    print ("Diện tích tam giác: ",round(dt,2))
else:
        print ("\nKhông Tạo Thành Tam Giác")
print (gach)
print ("Thank You ")

Câu C.

#Chiều Dài
length = float(input("Nhập Chiều Dài: "))
#Chiều Rộng
width = float(input("Nhập Chiều Rộng: "))
#Diện Tích
print("Diện Tích Hình Chữ Nhật: " + str(length * width))