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

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

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

var k:integer;
  begin
    k:=0;
    while (k<22) or (k>22) do
      begin
       readln(k);
       if (k=22) then
         k:=22
       else
         writeln('#');
      end;
    readln();
  end. 





var k:integer;
  begin
    k:=0;
    while (k<22) or (k>22) do
      begin
       readln(k);
       if (k=22) then
         break
       else
         writeln('#');
      end;
    readln();
  end.