Найти разницу между максимальным и минимальным элементом массива

@Mitrion · Регистрация: 10.02.2013

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

Здравствуйте ув. форумчане! Помогите написать программу на паскале которая будет находить разницу между максимальным и минимальным элементом массива состоящего из n эл-ов. (Заполнение массива с клавиатуры).

Заранее спасибо!

Kodzaev · 10.02.2013, 17:51

Pascal

Var
  x: Array[1..100] of Integer;
  i,n: Byte;
  min,max: Integer;
BEGIN
Write('Введите кол-во элементов: ');
Readln(n);
min:=High(min);
max:=Low(max);
For i:=1 to n do
begin
  Readln(x[i]);
  If x[i]<min Then min:=x[i];
  If x[i]>max Then max:=x[i];
end;
Writeln('MAX= ',max);
Writeln('MIN= ',min);
Writeln('Разница = ',max-min);
Readln
END.

@Mitrion · 10.02.2013, 18:50 **[ТС]**

Спасибо! Можете прояснить момент?

min:=High(min);
max:=Low(max);

Что у нас является минимальным и максимальным элементом массива изначально?

Kodzaev · 10.02.2013, 19:29

High возвращает самое высокое значение параметра.
В нашем случае min объявлена как Integer, следовательно high(min)=32767
Low - это противоположная high функция, возвращает самое низкое значение. (-32768)

@Mitrion 0 / 0 / 1 Регистрация: 10.02.2013 Сообщений: 21
		1
	Найти разницу между максимальным и минимальным элементом массива 10.02.2013, 17:45. Показов 3441. Ответов 3 Метки нет (Все метки) Здравствуйте ув. форумчане! Помогите написать программу на паскале которая будет находить разницу между максимальным и минимальным элементом массива состоящего из n эл-ов. (Заполнение массива с клавиатуры). Заранее спасибо! 0

@Mitrion 0 / 0 / 1 Регистрация: 10.02.2013 Сообщений: 21
	10.02.2013, 18:50 [ТС]	3
	Спасибо! Можете прояснить момент? min:=High(min); max:=Low(max); Что у нас является минимальным и максимальным элементом массива изначально? 0

Kodzaev 3030 / 1916 / 1649 Регистрация: 30.04.2011 Сообщений: 3,060
	10.02.2013, 19:29	4
	High возвращает самое высокое значение параметра. В нашем случае min объявлена как Integer, следовательно high(min)=32767 Low - это противоположная high функция, возвращает самое низкое значение. (-32768) 0

Опции темы