Решите на паскале нужно в заданной матрицы v (5, 6) определить максимальные элементы с положительных элементов каждой строки матрицы и сформировать из них одномерный массив. вывести исходную матрицу и создан массив

Так как в идет речь о матрице, то возможные варианты такой матрицы (исключаем 1х30 и 30х1): 2х15 3х10 5х6 далее повторения (меняются столбцы и строки) 6х5 10х3 15х2 попробуем написать программу, которая создает нужную матрицу  по первому числу (количество строк) и заполняет ее: //pascalabc.net (версия 3.1, сборка 1210 от 29.03.2016) var   a: array[,] of integer;   n,m,i,j,k: integer; begin   k: =1;   write('введите количество строк (одно число из 2,3,5,6,10,15) ');   readln(n); m: =30 div n;   a: =new integer[n,m];   for i: =0 to n-1 do begin       for j: =0 to m-1 do begin         a[i,j]: =k; k: =k+1;         write(a[i,j]: 3);     end;     writeln;   end; end. тест №1 введите количество строк 5   1  2  3  4  5  6   7  8  9 10 11 12   13 14 15 16 17 18   19 20 21 22 23 24   25 26 27 28 29 30 тест №2 введите количество строк 3   1  2  3  4  5  6  7  8  9 10   11 12 13 14 15 16 17 18 19 20   21 22 23 24 25 26 27 28 29 30

Последовательность натуральных чисел бесконечно, поэтому также бесконечна будет искомая сумма. для того, чтобы сделать реальной, ограничимся n первыми членами последовательности, т.е. рядом чисел 1,2,. в этом ряду первое число, кратное 5 - это 5. а дальше будем прибавлять по 5, пока не превысим числа n и все полученные числа складывать. вот короткое решение, написанное на самой современной версии языка паскаль. // pascalabc.net 3.1, сборка 1211 от 31.03.2016 begin   writeln(range(5,readinteger('n='),5).sum) end. результат выполнения программы: n= 100 1050 а вот решение на классическом "школьном" паскале var   i,n,s: integer; begin   write('n='); read(n);   s: =0;   i: =5;   while i< =n do begin       s: =s+i;       i: =i+5       end;   writeln(s) end. можно без компьютера и программирования обойтись, если вспомнить об арифметической прогрессии. для нашего тестового примера получаем 100(100+5)/10=10*105=1050