Найти минимальный элемент из элем массива с нечетными номерами и максимальный элемент элементов с четными

@_DjeK_ · Регистрация: 23.05.2017

4) Одномерный массив, состоящий из n элементов, заполняется введенными с клавиатуры целыми числами. Найти минимальный элемент из его элементов с нечетными номерами и максимальный элемент из его элементов с четными номерами.

@Hitoku · 24.05.2017, 01:22

Pascal

var
  a: array [1..100] of integer;
  i, imax, imin, n: byte;
begin
  write('n = '); readln(n);
  for i := 1 to n do begin
    write('a[', i, '] = ');
    readln(a[i]);
  end;
  imin := 1; imax := 2;
  write('Массив: ');
  for i := 1 to n do begin
    write(a[i], ' ');
    if i mod 2 = 0 then begin
      if a[imax] < a[i] then imax := i;
    end else
      if a[imin] > a[i] then imin := i;
  end;
  writeln;
  write('Max = ', a[imax], '; Min = ', a[imin]);
end.

@_DjeK_ 0 / 0 / 0 Регистрация: 23.05.2017 Сообщений: 7
		1
	Найти минимальный элемент из элем массива с нечетными номерами и максимальный элемент элементов с четными 23.05.2017, 11:59. Показов 5609. Ответов 1 Метки нет (Все метки) 4) Одномерный массив, состоящий из n элементов, заполняется введенными с клавиатуры целыми числами. Найти минимальный элемент из его элементов с нечетными номерами и максимальный элемент из его элементов с четными номерами. __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

Опции темы

Найти минимальный элемент из элем массива с нечетными номерами и максимальный элемент элементов с четными

Решение