type vect=array[1..7] of real ; var a,f,c,d: vect; Надрукувати найменші значення кожного з одновимірних масивів у порядку зростання. Визначати найменше та його порядковий номер у процедурі.
Quote
type vect=array[1..7] of real ; var a,f,c,d: vect; Напечатать наименьшие значения каждого из одномерных массивов в порядке возрастания. Определять наименьшее и его порядковый номер в процедуре.
Зарание спасибо тем кто поможет!) 1kurs kak 1 mirovaya
1) Создаёшь один дополнительный массив 2) Пишешь процедурку по считыванию значений элементов и поиска минимального в каждом, и ранее созданный массив записываешь минимальный элемент 3) Сортируешь этот массив и выводишь на экран) Нужна помощь? Сюда: vkontakte.ru/berestovskiy
