Мощность тепловоза 4 мвт. найдите силу тяги электровоза при скорости движения 90 км/ч.

Question

Информатика: Мощность тепловоза 4 мвт. найдите силу тяги электровоза при скорости движения 90 км/ч.

zvonilovakarina · Accepted Answer

#!/usr/bin/env perl
use strict;
use warnings;
use utf8;

my @vector;
my $vector_length = 100;
my $random_dia = 30000;
push @vector, int(rand($random_dia)) for(0..$vector_length);
my ($start, $end) = (undef, undef);
my ($min, $max, $sum) = ( $random_dia, 0, 0,);
for my $position (0.. $#vector)){
if($vector[$position] > $max ){
   $max = $vector[$position];
   $end= $position;
}
if($vector[$position] < $min ){
   $min = $vector[$position];
   $start= $position;
}
}

for my $position ($min..$max){
$sum += $vector[$position];
}

say 'Result: \t '.$sum;

MOGZ ответил