составьте программу, которая позволяет ввести элементы массива а [1...10] с клавиатуры и выводит на экран количество отрицательных элементов и их индексы.
P.S. не надо искать ответ в инете, т.к. там не правильно

что это?

// PascalABC.NET 3.2, сборка 1338 от 16.11.2016begin  var a:=ReadArrInteger('Введите 10 чисел, нажмите Enter'+#13#10,10);  var t:=a.Select((x,i)->(x,i+1)).Where(x->x[0]<0);  Write('Отрицательных- ',t.Count,'; их номера ');  t.Select(x->x[1]).Printlnend.ПримерВведите 10 чисел, нажмите Enter 3 14 0 -13 6 -11 -4 0 7 12Отрицательных- 3; их номера 4 6 7