Сформулируте два массива, по 24 элементов в каждом, с датчика случайных чисел в пределах от 25 до 225. получите третий массив по правилу: каждый элемент нового массива равен удвоенной сумме соответсвующих элементов исходных массивов. найдите в новом массиве количество элементов, больших 120 и не превосходящие 168.
155
418
Ответы на вопрос:
Указывать язык не забывайте. вариант на 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";
Program pas02; uses crt; const n=20; var a: array[1..n] of real; i,k: integer; t: real; begin randomize; clrscr; writeln('массив случайных чисел'); k: =0; for i: =1 to n do begin a[i]: =random(31)-15.0; write(a[i]: 6: 1); if a[i]=10.0 then inc(k) end; writeln; writeln('количество элементов, равных 10: ',k); write('нулевые элементы '); k: =0; for i: =1 to n do if a[i]=0 then begin inc(k); write(i,' ') end; if k=0 then writeln('отсутствуют') else writeln; writeln('меняем местами элементы 3 и 6'); t: =a[3]; a[3]: =a[6]; a[6]: =t; for i: =1 to n do write(a[i]: 6: 1); writeln end. тестовое решение массив случайных чисел 2.0 -12.0 8.0 -2.0 -1.0 3.0 -12.0 -9.0 3.0 9.0 -8.0 0.0 -7.0 -4.0 -12.0 10.0 9.0 5.0 -8.0 6.0 количество элементов, равных 10: 1 нулевые элементы 12 меняем местами элементы 3 и 6 2.0 -12.0 3.0 -2.0 -1.0 8.0 -12.0 -9.0 3.0 9.0 -8.0 0.0 -7.0 -4.0 -12.0 10.0 9.0 5.0 -8.0 6.0
Популярно: Информатика
-
alinamensikova05.08.2022 01:44
-
7Rahat07.08.2022 20:09
-
nutka198010.10.2021 23:48
-
Hockeyist9715.02.2023 08:21
-
Плювиофил26.12.2021 05:48
-
alixegp073ii24.10.2020 21:09
-
artkeyn112.05.2022 21:23
-
mirator9117.04.2023 10:56
-
lefuxetube07.12.2020 04:33
-
vfffffffff11.11.2021 18:12