Var cd,cr,cv,dt:real;

Begin

Write('Chieu dai = ');readln(cd);

Write('Chieu rong = ');readln(cr);

cv:=(cd+cr)*2;

dt:=cd*cr;

Writeln('Chu vi la ',cv:10:2);

Write('Dien tich la ',dt:10:2);

Readln

End.

a = int(input('Nhập số nguyên a: '))

b = int(input('Nhập số nguyên b: '))

c = int(input('Nhập số nguyên c: '))

if a > b and a > c:

          print('Số lớn nhất là a =', a)

elif b > a and b > c:

          print('Số lớn nhất là b =', b)

else:

          print('Số lớn nhất là c =', c)

def dem_so_tu(chuoi):

      dem = 0

      tu = chuoi.split()

      for word in tu:

            if word.isalpha():

                  dem += 1

      return dem

chuoi = input("Nhập một chuỗi: ")

so_tu = dem_so_tu(chuoi)

print("Số từ trong chuỗi là:", so_tu)

# Nhập danh sách số nguyên
lst = []
n = int(input("Nhập số lượng số nguyên trong danh sách: "))
for i in range(n):
    lst.append(int(input("Nhập số nguyên thứ {}: ".format(i+1))))

# Tính tổng các số trong danh sách
total = sum(lst)

# Đưa ra kết quả
print("Tổng các số trong danh sách là:", total)

chuoi = input("Nhập chuỗi: ")

so_lan_A = chuoi.count('A')

print("Số lần xuất hiện của ký tự A trong chuỗi:", so_lan_A)