Определить максимальное значение среди чисел x и y,минимальное значение среди чисел a и b.Числа x и y, a и b вводятся с клавиатуры.Результат работы программы выводится на экран

//Ну это, это-то можно понять без сторонней помощи!//Pascal ABC.NET 3.1 сборка 1219Var x,y,a,b:real;begin read(x,y,a,b); if x>y then writeln('Max=',x) else writeln('Max=',y); if a<b then writeln('Min=',a) else writeln('Min=',b);end.Пример ввода:1234Пример вывода:Max=2Min=3