Задача.
Даны два числа Х и Y. Выдать на печать наименьшее из них, пользуясь формулой.
Выберите правильное решение.

• Бейсик
  REM Нахождение наименьшего из двух чисел
  PRINT “Введите два числа”
  INPUT “X=“; X; “Y=“; Y
  C=\(X\+Y\-ABS\(X\-Y\))/2
  PRINT “ MIN из двух чисел”; X; “и” Y “; С
  END
  Паскаль
  program zadacha \(input, output\);
  {нахождение наименьшего из двух чисел}
  var
  x, y, c : real;
  begin
  writeln \(‘введите два числа’\);
  readln \(x,y\);
  c:=\(x\+y\-abs\(x\-y\))/2;
  writeln \(‘ min число из двух чисел =‘, c\);
  end.

• Бейсик
  REM Нахождение наименьшего из двух чисел
  PRINT “Введите два числа”
  INPUT “X=“; X; “Y=“; Y
  C=X+Y-ABS\(X\-Y\)/2
  PRINT “ MIN из двух чисел”; X; “и” Y “; С
  END
  Паскаль
  program zadacha \(input, output\);
  {нахождение наименьшего из двух чисел}
  var
  x, y, c : real;
  begin
  writeln \(‘введите два числа’\);
  readln \(x,y\);
  c:=x+y-abs\(x\-y\)/2;
  writeln \(‘ min число из двух чисел =‘, c\);
  end.