По разделам



Задача Minmax 11


Дано целое число N и набор из N целых чисел. Найти номер
последнего экстремального (то есть минимального или максимального)
элемента из данного набора.

Код (C/C++)

#include <stdio.h>
int main(void)
{
    int i,n,ni,min,max,minn,maxn;
    printf("N:");
    scanf("%i", &n);
    for (i=1;i<=n;++i){
        printf("%i>",i);
        scanf("%i", &ni);
        if ((i==1)||(ni<=min)){
            min=ni;
            minn=i;
        }
        if ((i==1)||(ni>=max)){
            max=ni;
            maxn=i;
        }
    }
    printf("%i\n", minn>maxn?minn:maxn);
    return 0;
}

Код (Python)

import random

N = random.randrange(1,15)
print("N = ",N)
L = [random.randint(1, 7) for i in range(N)]
print(L)

_max = max(L)
print("Максимум: ", _max)
_min = min(L)
print("Минимум: ", _min)

for i in range(N):
    if L[i] == _max or L[i] == _min:
        k = i
print("Индекс последнего экстремума: ", k)

									

Код (Pascal)

program MinMax11;
var
  i,N,Ni,Min,Max,MinNum,MaxNum:Integer;
 
begin
  Write('N:');
  Readln(N);
  for i:=1 to N do
   begin
     Write(i,' элемент:');
     Readln(Ni);
     if i=1 then
      begin
       Min:=Ni;
       Max:=Ni;
       MinNum:=i;
       MaxNum:=i;
      end;
     if Ni<=Min then
      begin
       Min:=Ni;
       MinNum:=i;
      end;
 
     if Ni>=Max then
      begin
       Max:=Ni;
       MaxNum:=i;
      end;
   end;
 
   if MinNum > MaxNum then Writeln(MinNum)
   Else Writeln(MaxNum);
   Readln;
end.
									




Minmax. Абрамян
Minmax 1 Просмотров: 39
Minmax 2 Просмотров: 29
Minmax 3 Просмотров: 22
Minmax 4 Просмотров: 19
Minmax 5 Просмотров: 30
Minmax 6 Просмотров: 37
Minmax 7 Просмотров: 34
Minmax 8 Просмотров: 19
Minmax 9 Просмотров: 28
Minmax 10 Просмотров: 18
Minmax 11 Просмотров: 48
Minmax 12 Просмотров: 37
Minmax 13 Просмотров: 34
Minmax 14 Просмотров: 25
Minmax 15 Просмотров: 28
Minmax 16 Просмотров: 23
Minmax 17 Просмотров: 27
Minmax 18 Просмотров: 28
Minmax 19 Просмотров: 22
Minmax 20 Просмотров: 35
Minmax 21 Просмотров: 36
Minmax 22 Просмотров: 20
Minmax 23 Просмотров: 26
Minmax 24 Просмотров: 31
Minmax 25 Просмотров: 17
Minmax 26 Просмотров: 41
Minmax 27 Просмотров: 30
Minmax 28 Просмотров: 27
Minmax 29 Просмотров: 31
Minmax 30 Просмотров: 29

Комментарии

Чтобы написать комментарии вам нужно войти в систему или зарегистрироваться