Bài 1:

uses crt;

var a,b,c:integer;

begin

clrscr;

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 writeln('3 canh do la 3 canh cua tam giac')

else writeln('3 canh do khong phai la 3 canh cua tam giac');

readln;

end.

Bai 2:

uses crt;

var b,c:integer;

x:real;

begin

clrscr;

write('nhap b: '); readln(b);

write('nhap c: '); readln(c);

if (b = 0) and (c = 0) then writeln('phuong trinh vo so nghiem')

else if (b = 0) and (c <> 0) then writeln('phuong trinh khong co nghiem')

else if (b <> 0) then 

begin

x:= (-c)/b;

writeln('x bang: ',x);

end;

readln;

end.

Bai 3:

uses crt;

var a,b,c,max:integer;

write('nhap a: '); readln(a);

write('nhap b: '); readln(b);

write('nhap c: '); readln(c);

max:=a;

if (max < b) then max:= b;

if(max < c) then max:= c;

write('so lon nhat: ',max);

readln;

end.

Bai 4:

uses crt;

var a,n:integer;

begin

clrscr;

write('nhap n: ); readln(n);

write('nhap so lon hon n: '); readln(a);

if (a < n) then

begin

write('nhap lai: '); readln(a);

end;

readln;

end.

Câu 1:

gach="--------------------------------------------------"
print("CHƯƠNG TRÌNH XÁC ĐỊNH TAM GIÁC VÀ TÍNH CHU VI, DIỆN TÍCH")

print (gach)
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")

    else:
        print ("\nKhông Tạo Thành Tam Giác")

Câu 2:

b = float(input("Nhập Hệ Số b: "))
c = float(input("Nhập Hệ Số c: "))
delta = b*b - 4*a*c
#giải phương trình
if delta < 0:
    print("\nPhương Trình Vô Nghiệm !")
elif delta == 0:
    print("\nPhương Trình Có Nghiệm Kep x1 = x2", -b/(2))
else:
    x1 = (-b - math.sqrt(delta))/(2)
    x2 = -b/-x1
    print("\nPhương Trình Có 2 Nghiệm Phân Biệt ")
    print("x1 = ",x1, "x2 = ", x2)

Câu 3:

a = int(input("nhập số a"))
b = int(input("nhập số b"))
c = int(input("nhập số c"))
if (a > b > c):
        print("a là số lớn nhất")
elif(a < b > c):
        print("b là số lớn nhất")
else:
        print("c là số lớn nhất")

câu 4:

n = int(input("nhập số n"))
solonhonn = int(input("nhập số lớn hơn n"))
if (solonhonn > n):
    print("nhập đúng số rồi")
else:
    print("nhập sai!nhập lại")

gửi bạn kèm ảnh với code