сабж...оч нада СРОЧНО ...с мя причетаеца 8)
нада к понедельнику лабы сдать ...а у мя 3 лабы не готовы...
Требуется помощь человека знающего TurboPascal7
-
>sanek<
1/Найти минимальный по модулю элемент массива :
X=
2 1 0 -1
0 2 1 0
3 -2 2 0
2/Определить количество и произведение элементов главной диагонали .
С=
1 3 0 1 2
-1 3 2 1 4
5 0 -1 4 -1
1 3 2 4 1
0 -3 1 2 2
удовлетворяющий условию Cii<=2
3/Используя программу ранжирования , найти сумму 3-х наибольших по модулю элементов массива :
T=(-1,2,1,1,-4,0,2,5,3,-2,1)
распечатать массив до и после ранжирования .
4/Найти произведение элементов с нечетными номерами массива :
B=(2,-1,3,-1,-1,0,4,5)
X=
2 1 0 -1
0 2 1 0
3 -2 2 0
2/Определить количество и произведение элементов главной диагонали .
С=
1 3 0 1 2
-1 3 2 1 4
5 0 -1 4 -1
1 3 2 4 1
0 -3 1 2 2
удовлетворяющий условию Cii<=2
3/Используя программу ранжирования , найти сумму 3-х наибольших по модулю элементов массива :
T=(-1,2,1,1,-4,0,2,5,3,-2,1)
распечатать массив до и после ранжирования .
4/Найти произведение элементов с нечетными номерами массива :
B=(2,-1,3,-1,-1,0,4,5)