Вкакой из трех весовых категориях будет выступать атлет имеющий вес b если границы весовых категориий распределяются следующим образом до a -1 весовая категория больше a но меньше b-2 весовая категория больше b-3 весовая категория паскаль

program raf105;

var

 x,a,b: real;

begin

 write('Введите вес атлета: ');

 readln(x);

 write('Введите границы весовых категорий (2 числа A и B): ');

 readln(a,b);

 if x < a

   then writeln('Первая весовая категория');

 if (x > a) and (x < b)

   then writeln('Вторая весовая категория');

 if x > b

   then writeln('Третья весовая категория');

end.