test.R

fungsi=function(x) 
{
  for(i in 1 : length(x)) 
  {
    if(x[i]<65) 
    {
      x[i]=x[i]+10;
    } 
    print(x[1]) 
  }
}
A=c(100, 95, 70, 80, 25, 60, 80, 60, 55, 90)
fungsi(A) 

## [1] 100
## [1] 100
## [1] 100
## [1] 100
## [1] 100
## [1] 100
## [1] 100
## [1] 100
## [1] 100
## [1] 100

exp(1) 

## [1] 2.718282