Даны действительные числа а, b, с. удвоить эти числа, если а ≥ b ≥ с, и заменить их абсолютными значениями, если а,b или с отрицательные. по возможности объясните,как вы это делали, чтобы до меня дошло,что от меня хотят, !

// pascalabc.net 3.3, сборка 1611 от 06.01.2018 // внимание! если программа не работает, обновите версию! begin   var (a,b,c): =readreal3('введите три числа: ');   if b.between(a,c) then (a,b,c): =(2*a,2*b,2*c);   if (a< 0) or (b< 0) or (c< 0) then (a,b,c): =(abs(a),abs(b),abs(c));   writeln('a=',a,', b=',b,', c=',c) end. пример введите три числа: 3.6 -5.2 8 a=3.6, b=5.2, c=8 первый оператор читает с клавиатуры три вещественных числа и помещает их в переменные a,b,c. второй оператор проверяет, находится ли второе число (b) между остальными двумя (может и совпадать с одним из них). если да, то значение каждой переменной удваивается. третий оператор проверяет, есть ли среди введенных чисел хоть одно отрицательное. если есть, значения заменяются их модулями (становятся положительными). и в конце следует вывод результатов.

var x: integer;

begin

  readln(x);

  if (x> 10)and(x< 20) then writeln('принадлежит')

  else writeln('не принадлежит');

end.