tp

# Exercice 4
a <- matrix(1:9, nrow = 3, ncol = 3, byrow = TRUE)
print(a)

b <- matrix(1:9, nrow = 3, ncol = 3)
print(b)

c <- matrix(c(1,0,0,0,1,0,0,0,1), nrow = 3, ncol = 3, byrow = TRUE)
print(c)

print(a+b)
print(a * b)
print(b*a)