Вмассиве с={1,2,-3,0,-1,-7,-9,9,10,-3} найти количество - вопрос №641335512301799103 от мария2388 31.01.2023 19:25

Question

Информатика: Вмассиве с={1,2,-3,0,-1,-7,-9,9,10,-3} найти количество соседств двух положительных и количество соседств двух отрицательных элементов массива

мария2388 · Answer

//PascalABC.Net 3.1 сборка 1200var    c: array of integer := (1, 2, -3, 0, -1, -7, -9, 9, 10, -3);begin//    c := ArrRandomInteger(10, -10, 10);    Println(c);    Writeln(c.Pairwise().Where(x - x.Item1 * x.Item2 0));end....