edad<-8
nombre<-"Mariana"
if (edad<=5)
{
clasifica<-"Infantil"
apoyo<-"Guarderia"
}
if (edad>=6 & edad<=14)
{
clasifica<-"Adolescente"
apoyo<-"Becas"
}
if (edad>=15 & edad<=19)
{
clasifica<-"Joven"
apoyo<-"Becas"
}
if (edad>=20 & edad<=29)
{
clasifica<-"Adulto Joven"
apoyo<-"Trabajo"
}
if (edad>=30 & edad<=50)
{
clasifica<-"Adulto Plenitud"
apoyo<-"Trabajo"
}
if (edad>=51 & edad<=67)
{
clasifica<-"Adulto Maduro"
apoyo<-"Medicina"
}
if (edad>=68)
{
clasifica<-"Adulto Mayor"
apoyo<-"Medicina"
}
print(paste("La persona de nombre:",nombre))
## [1] "La persona de nombre: Mariana"
print(paste("Tiene",edad,"años"))
## [1] "Tiene 8 años"
print(paste("Se clasifica en:",clasifica))
## [1] "Se clasifica en: Adolescente"
print(paste("Requeire apoyo de tipo:",apoyo))
## [1] "Requeire apoyo de tipo: Becas"