Среди 4 чисел найти наименьшее и наибольшее числа

Могу на python:
arr = [18,9,27,3] ;
minA = min(a);
maxA = max(a);
print(minA+" "maxA);

Var a,b,c,d: real;
begin
  write('числа a,b,c,d через пробел:  ');
  readln(a,b,c,d);
  writeln('минимум:  ',min(a,min(b,min(c,d;
  writeln('максимум:  ',max(a,max(b,max(c,d;
end.