print "期末テストの点数(0--100)を入力してください。:";
$point = <STDIN>;
chop($point);

if($point >= 80){
    print "Sobresaliente....優です。\n";
}
elsif($point >= 70){
   print "Notable....良です\n";
}
elsif($point >=60){
  print "Aprobado....可です\n";
}
else{
  print "No Aprobado....不合格です。来年がんばりましょう。\n";
}

