B1:

uses crt;

var a:integer;

begin

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

if (a mod 11)=0 then writeln('a chia het cho 11') else writeln('a ko chia het cho 11');

readln;

end.

B2:

uses crt;

var a,b,c:integer;

begin

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

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

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

if (a<b+c) or (b<a+c) or (c<a+b) then writeln('thanh tam giac') else writeln('ko thanh tam giac');

readln;

end.

B3:

uses crt;

var x,y,z:integer;

begin

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

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

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

max:=x;

min:=z;

if y>max then max:=y;

if z>max then max:=z;

if y<min then min:=y;

if x<min then min:=x;

writeln('so to nhat: ',max);

writeln('so nho nhat: ',min);

readln;

end.

Câu 1:

n = int(input("nhập số n"))
if (n & 11):
 print("n có thể chia hết cho 11")
elif (n % 11):
 print("n không thể chia hết cho 11")

Câu 2:

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")
    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))
    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 3:

z = int(input("nhập số z"))
y = int(input("nhập số y"))
z = int(input("nhập số z"))
if (z > y == z):
 print("z là số lớn nhất")
elif (z < y > z):
 print("y là số lớn nhất")
elif (z < y == z):
 print("z là số lớn nhất")
elif (z == y == z):
 print("3 số bằng nhau")