Сформулируте два массива, по 24 элементов в каждом, с датчика случайных чисел в пределах от 25 до 225. получите третий массив по правилу: каждый элемент нового массива равен удвоенной сумме соответсвующих элементов исходных массивов. найдите в новом массиве количество элементов, больших 120 и не превосходящие 168.
Вариант на Perl:
#!/usr/bin/perl
$sum=0;
for(0..23){
$arr1[$_]=int(rand(201)+25);
$arr2[$_]=int(rand(201)+25);
$arr3[$_]=2*($arr1[$_]+$arr2[$_]);
if (($arr3[$_]>120)&&($arr3[$_]<168)){$sum+=$arr3[$_]};
};
print "@arr1\[email protected]\[email protected]\n$sum\n";