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

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

import random

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

L = [random.randint(1, 15) for i in range(N)]
print("Initial:",L)
L = sorted(L)
print("Sorted:",L)
print(L[-1],L[-2],L[-3])
									

program Minmax23;
var
  Max1,Max2,Max3,R,Sum:Real;
  N,i:Integer;
 
begin
  Sum:=0;
  Write('N:');
  Readln(N);
  for i:=1 to N do
   begin
     Write(i,' число:');
     Readln(R);
 
     if i=1 then
      begin
       Max1:=R;
       Max2:=R;
       Max3:=R;
      end;
 
     if Max1=Max2 then Max2:=R;
 
     if (Max3=Max1) or (Max3=Max2) then Max3:=R;
 
    if R>Max3 then
       if R>Max2 then
        if R>Max1 then
         begin
          Max3:=Max2;
          Max2:=Max1;
          Max1:=R;
         end
        else if R<>Max1 then
         begin
          Max3:=Max2;
          Max2:=R;
         end
       else if R<>Max2 then Max3:=R;
 
   end;
   writeln(Max1,' ',Max2,' ',Max3);
end.