x<- 3
y<- 2
suma<-x+y
suma
## [1] 5
resta<- x-y
resta
## [1] 1
multiplicacion<- x*y
multiplicacion
## [1] 6
division<- x/y
redondeo_arriba <-ceiling(x/y)
redondeo_arriba
## [1] 2
redondeo_abajo <-floor (x/y)
redondeo_abajo
## [1] 1
truncar <-trunc(division)
truncar
## [1] 1
#constantes
pi
## [1] 3.141593
radio<-5
area_circulo <-pi*radio**2
area_circulo
## [1] 78.53982