1) дан массив целых чисел, содержащий 15 элементов. вывести на экран индексычетных элементов массива. 2) сформировать массив из n случайных чисел от 0 до 86. найти сумму чисел кратных 3. 3) с клавиатуры вводится массив из m чисел. найти сумму элементов массива. 4) сформировать массив из n случайных чисел на промежутке [-60; 60]. найти сумму чисел больших нуля. что сможете,

169

385

Посмотреть ответы 2

Ответы на вопрос:

max100500206

Информатика

4,6(45 оценок)

Pascalabc.net 3.3.5, сборка 1660 от 20.04.2018 внимание! если программа не работает, обновите версию! begin // №1 var a: =arrrandom(15,-50,50); a.println; a.indexesof(t-> t.iseven).select(t-> t+1).println; // №2 var b: =arrrandom(readinteger('n='),0,86); b.println; a.where(t-> t mod 3=0).sum.println; // №3 var c: =readarrinteger(readinteger('m=')); c.sum.println; // №4 var d: =arrrandom(readinteger('n=',60); d.println; d.where(t-> t> 0).sum.println end. пример 41 37 -10 7 33 -8 49 -1 -14 26 -17 -23 47 -25 7 3 6 9 10 n= 13 0 63 53 71 35 56 34 86 31 15 84 74 35 33 m= 8 13 -12 54 11 47 0 42 100 255 n= 18 52 39 -43 48 -34 -56 -14 28 -51 48 -56 -21 60 -19 -5 -19 43 44 362