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

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

import random

N = random.randrange(3,15)
print("N = ",N)

largest = 0
temp_largest = 0
for i in range(0,N):
    x = random.randint(1, 15)
    print(x,end="; ");
    if x % 2 == 0:
        temp_largest += 1
    else:
        if temp_largest > largest:
            largest = temp_largest
        temp_largest = 0
if temp_largest > largest:
    largest = temp_largest

print("\nLargest Length of Evens:",largest)
									

program Minmax26;
var
  N,i,Ni,Num,MaxNum:Integer;
 
begin
  Num:=0;
  MaxNum:=0;
  Write('N:');
  Readln(N);
  for i:=1 to N do
   begin
     Write(i,' число:');
     Readln(Ni);
 
     if (Ni mod 2) = 0 then inc(Num)
     else
      begin
       if Num>MaxNum then MaxNum:=Num;
       Num:=0;
      end;
 
    end;
   if Num>MaxNum then MaxNum:=Num;
   Writeln(MaxNum);
end.