(PASCAL) Дан двухмерный массив целых чисел?

Alpatovadaria95 9 сент. 2020 г., 19:35:02

/ / Pascal ABC.

NET v3.

1 сборка 1172

Const

n = 5 ;

Var

ma : array[1.

N, 1.

N] of integer ;

i, j, max, maxj, a : integer ;

begin

max : = - 1 ;

randomize ;

writeln('Matrix : ') ; for i : = 1 to n do begin ; for j : = 1 to n do begin ; ma[i, j] : = random(10) ; write(ma[i, j] : 4) ; end ; writeln ; end ; for j : = 1 to n do begin for i : = 1 to n do a : = a + ma[i, j] ; if a> ; max then begin max : = a ; maxj : = j ; end ; a : = 0 ; end ;

write('Максимальный по сумме столбец : ', maxj) ;

end.

Пример работы кода :

Matrix : 8 6 8 0 2 6 1 2 9 8 8 1 8 0 1 4 5 1 5 2 3 0 9 9 5

Максимальный по сумме столбец : 1.

Alexkem42 24 мая 2020 г., 22:28:12 | 5 - 9 классы

Pascal ABC?

Pascal ABC.

Двухмерный массив.

1)вычислить количество чётных элементов 2) сумму элементов столбца по его введённому номеру.

Marsikjane 21 янв. 2020 г., 13:29:52 | 5 - 9 классы

Pascal, задания на min max Дано целое число N и набор из N целых чисел?

Pascal, задания на min max Дано целое число N и набор из N целых чисел.

Найти количество элементов, расположенных после последнего максимального элемента.

Миньон4 2 янв. 2020 г., 08:46:10 | 10 - 11 классы

Дан массив всех целых чисел ?

Дан массив всех целых чисел .

Найти сумму элементов в массиве.

(Паскаль).

Anastasiamakar 27 янв. 2020 г., 00:10:36 | 10 - 11 классы

Дан массив из 100 целых чисел и найти сумму элементов массива?

Дан массив из 100 целых чисел и найти сумму элементов массива.

Galinababenko 9 окт. 2020 г., 06:25:18 | 10 - 11 классы

Написать программу на паскале?

Написать программу на паскале.

Создать двухмерный массив из целых чисел, в котором поменять местами максимальный и минимальный элементы.

Помогите пж.

Sashasex 23 мар. 2020 г., 18:02:19 | 10 - 11 классы

21. Дан двухмерный массив?

21. Дан двухмерный массив.

Найти сумму элементов массива.

Kagazbaeva 5 мар. 2020 г., 11:06:41 | 10 - 11 классы

(Pascal) Дан двухмерный массив целых чисел?

(Pascal) Дан двухмерный массив целых чисел.

Определить является ли сумма элементов первого столбца нечетным числом.

Настюшка165 3 мая 2020 г., 11:59:32 | 1 - 4 классы

Дан двухмерный массив найти максимальный элемент?

Дан двухмерный массив найти максимальный элемент.

Annaborash2003 19 сент. 2020 г., 13:21:30 | 10 - 11 классы

Помогите решить задачу в Pascal Дан массив целых чисел, состоящий из 30 элементов?

Помогите решить задачу в Pascal Дан массив целых чисел, состоящий из 30 элементов.

Заполнить его датчиком случайных чисел.

Найти сумму отрицательных элементов.

Chernovdanil2 14 мар. 2020 г., 08:27:02 | 10 - 11 классы

Pascal?

Pascal.

Дан массив.

Найти сумму тех элементов , которые расположены до максимального элемента данной последовательности .

Результат сохранить в файл.