38

38.pl

#!/usr/bin/env perl

use strict;
use warnings;

my @array;

for my $i (1..10){
  push @array, $i;
}

my $sum = $array[2] + $array[5] + $array[9];
print "３番目の要素、６番目の要素、１０番目の要素の合計は$sumです。\n";