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

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

import random

N = random.randrange(1,15)
print("N = ",N)
L = [random.randint(-5, 3) for i in range(N)]
print(L)
L_positive = [i for i in L if i > 0]
print(L_positive)
if len(L_positive) == 0:
    print("0, положительных нет")
else:
    min_ = min(L_positive)
    print("Минимальное положительное:",min_)
									

program MinMax12;
var
  R,Min:Real;
  i,N:Integer;
 
begin
  Write('N:');
  Readln(N);
  Min:=0;
  for i:=1 to N do
   begin
     Write(i,' : ');
     Readln(R);
     if ((R<Min) or (Min=0)) and (R>0) then Min:=R;
   end;
   Writeln(Min);
end.