#EJERCICIO 1
#parametros de la distribución Gamma
alpha<-2
beta<-400
#Valor para el cual queremos la probabilidad
x<-800
proba=1-pgamma(x,shape=alpha,rate=1/beta)
#imprimiendo la probabilidad.
print(paste("La probabilidad de que x sea mayor que 800 es:",proba))[1] "La probabilidad de que x sea mayor que 800 es: 0.406005849709838"