Решение задачи Proc 11

#include <stdio.h>
void  minmax(float *x, float *y){
   if (*x>*y){
       *x+=*y;
       *y=*x-*y;
       *x-=*y;
   }
}
 
int main(void)
{
    float a,b,c,d;
    printf("A:");
    scanf("%f", &a);
    printf("B:");
    scanf("%f", &b);
    printf("C:");
    scanf("%f", &c);
    printf("D:");
    scanf("%f", &d);
 
    minmax(&a,&b);
    minmax(&c,&d);
    minmax(&a,&c);
    minmax(&b,&d);
    printf("min:%f; max:%f\n",a,d);
 
    return 0;
}

import random

def Minmax(X,Y):
    L = []
    if X < Y:
        L.append(X)
        L.append(Y)
    else:
        L.append(Y)
        L.append(X)
    return L

A = random.randrange(-10,10)
B = random.randrange(-10,10)
C = random.randrange(-10,10)
D = random.randrange(-10,10)
print("A = ",A)
print("B = ",B)
print("C = ",C)
print("D = ",D)
print()

A1,B1 = Minmax(A,B)
C1,D1 = Minmax(C,D)
Min1,X = Minmax(A1,C1)
X,Max1 = Minmax(B1,D1)

print("Minimum = ",Min1)
print("Maximum = ",Max1)
									

program Proc11;
 
procedure Minmax(var X,Y:Real);
begin
if X>Y then
  begin
    X:=X+Y;
    Y:=X-Y;
    X:=X-Y;
  end;
end;
 
var
  A,B,C,D:Real;
  
begin
  Write('A :');
  Readln(A);
  Write('B :');
  Readln(B);
  Write('C :');
  Readln(C);
  Write('D :');
  Readln(D);
  Minmax(A,B);
  Minmax(C,D);
  Minmax(A,C);
  Minmax(B,D);
  Writeln('min: ',A,'; max: ',D);
end.