Решение задачи Minmax 13

#include <stdio.h>
int main(void)
{
    int i,n,r,max,maxnum;
 
    printf("N:");
    scanf("%i", &n);
    for (i=1;i<=n;++i){
        printf("%i>",i);
        scanf("%i", &r);
        if ((r%2!=0&&r>max)||(i==1)){
            max=r;
            maxnum=i;
        }
    }
    printf("%i\n", maxnum);
    return 0;
}

import random

N = random.randrange(1,15)
print("N = ",N)
L1 = [random.randint(1, 10) for i in range(N)]
print("Initial:")
print(L1)
L2 = [i for i in L1 if i%2 == 1]
print("Processed:")
print(L2)
if len(L2) == 0:
    print("0, нечетных нет")
else:
    x = max(L2)
    print("Максимальное нечетное:",x)
    print("Индекс первого максимального нечетного:",L1.index(x))
									

program MinMax13;
var
  i,N,R,Max,MaxNum:Integer;
 
begin
  Write('N:');
  Readln(N);
  for i:=1 to N do
   begin
     Write(i,': ');
     Readln(R);
     if (odd(R) and (R>Max)) or (i=1) then
      begin
       Max:=R;
       MaxNum:=i;
      end;
   end;
   Writeln(MaxNum);
end.