Нужно написать 2 программы pascal 1. Дан одномерный - вопрос №117520512120 от ник5041 13.08.2021 21:00

Question

Информатика: Нужно написать 2 программы pascal 1. Дан одномерный массив из 20 элементов, массив заполнен случайными числами от -50 до 50. Вывести на экран все отрицательные элементы массива. 2. Дан одномерный массив из 30 элементов, массив заполнен случайными числами от 0 до 50. Найти сумму элементов массива.

ник5041 · Answer

// PascalABC.NETbegin  // 1  var a := ArrRandom(20, -60, 50);  a.Println.Where(p - p 0).Println;  // 2  var b := ArrRandom(30, 0, 50);  b.Println.Sum.Printend....