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

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

var a: integer;
begin
  readln(a);
 { while (a <> 22) do
        begin
        writeln('#');
        readln(a);
        if (a = 22) then
        writeln();
        end;  }


 while (a <> 22) do
       begin
         writeln('#');
         readln(a);
         if (a = 22) then
         break;
       end;
  readln();
end.  
vedro-compota's picture

Пустой writeln(); в первом решении не нужен

_____________
матфак вгу и остальная классика =)

var a: integer;
begin
  readln(a);
    while (a <> 22) do
      begin
        writeln('#');
        readln(a);
          if (a = 22) then
      end;


 while (a <> 22) do
   begin
     writeln('#');
     readln(a);
       if (a = 22) then
         break;
   end;
  readln();
end.