Вычислить разность между максимальным и минимальным по модулю элементами массива

26.04.2009, 08:45. **Показов** 1761. **Ответов** 2

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

Дан массив Х(178). Вычислить разность между максимальным и минимальным по модулю элементами этого массива.

26.04.2009, 09:44

Данo натуральное число N. Вычислить
и там вот такая формула

@Halva · 26.04.2009, 13:46

1

Pascal

 uses crt;
 var
 a:array[1..178]of integer;
 min,max,rezult,i:integer;
 begin
 randomize;
 for i:=1 to 178 do
 begin
 a[i]:=random(178);
 end;
 min:=abs(a[1]);
 for i:=2 to 178 do
 if abs(a[i])<min then
 min:=abs(a[i]);
 max:=abs(a[1]);
 for i:=2 to 178 do
 if abs(a[i])>max then
 max:=abs(a[i]);
 writeln('Максимальный по модулю элумент ',max);
  writeln('Минимальный по модулю элумент ',min);
 rezult:=max-min;
 writeln('Разница между минимальным и максимальным равна ',rezult);
 end.

111тема
		1
	Вычислить разность между максимальным и минимальным по модулю элементами массива 26.04.2009, 08:45. Показов 1761. Ответов 2 Метки нет (Все метки) Дан массив Х(178). Вычислить разность между максимальным и минимальным по модулю элементами этого массива.

	26.04.2009, 13:46

Вычислить разность между максимальным и минимальным по модулю элементами массива

Решение