1. Правильно ли описан массив С? Если нет, то что надо изменить?Const nl=25;Type m=Array[15. . -nl] Of Integer;Var С: m;2. Что получится в результате выполнения программы?Program Variant2;Const n=10;Type myarray=Array[1. . n] Of Integer;Var D: myarray;i: Byte; p: Integer;Beginp:=0;+ For i:=l To n DoBeginD[i]:=-25+Random(51);If D[i]<0 Then p:=p+D[i];End;Writeln (p);Readln;End. 3. Дан массив целых чисел, состоящий из 25 элементов. Заполнить его с клавиатуры. Найти:сумму элементов, имеющих нечетные индексы;число элементов массива, значения которых больше заданного числа А и кратны 5. 4. Найти номер первого отрицательного элемента, делящегося на 5 с остатком 2.