Pascal. Пожалуйста посчитайте то, что не заполнено

if x>25 then

 if x<40 then

   writeln('подходит')

 else

   writeln('не подходит')

else

 writeln('не подходит');

в пропуск на алгоритмическом языке вставить не подходит