Написать функцию, находящую минимальный элемент в массиве

@KOstyankos1 · Регистрация: 22.10.2012

Студворк — интернет-сервис помощи студентам

Написать функцию, находящую минимальный элемент в массиве.

@far_outer · 12.02.2013, 17:08

Pascal

Type arr=array[0..10] of integer;
 
function FindMin(Var a:arr):integer;
var i,j:integer;
begin
j:=a[0];
for i:=1 to 10 do
 if a[i]>j then
  begin
  j:=a[i];
  end;
 FindMin:=j;
 end;

@KOstyankos1 0 / 0 / 0 Регистрация: 22.10.2012 Сообщений: 40
		1
	Написать функцию, находящую минимальный элемент в массиве 12.02.2013, 16:57. Показов 985. Ответов 1 Метки нет (Все метки) Написать функцию, находящую минимальный элемент в массиве. 0

Опции темы

Написать функцию, находящую минимальный элемент в массиве

Решение