Задача 7 урок 11

http://fkn.ktu10.com/?q=node/7341
Пользователь вводит целые числа, в ответ выводите символ #. Если введенное пользователем число равно 22, то завершите цикл не выводя ничего в ответ. Решите эту задачу 2-мя способами:
С использованием if()
С использованием break;

program task7_lesson;
var
  i:integer;
  begin
       writeln('Enter integer: ');
       readln(i);
       while (i <> 22) do
       begin
         if (i <> 22) then
            begin
              writeln('#');
              readln(i);
            end
         else
             break;
       end;
  readln();
  end.