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

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

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

program lesson11_7;
var
    a : integer;
begin
    a := 1;
    while a <> 22 do
    begin
        writeln('enter number a');
        readln(a);
        if a <> 22 then
            writeln('#')
    end;
    readln();
end. 

program lesson11_7;
var
    a : integer;
begin
    a := 1;
    while a <> 22 do
    begin
        writeln('enter number a');
        readln(a);
        if a = 22 then
            break;
        writeln('#')
    end;
    readln();
end.