> -- Info21 писал(а):
> Там однократный while. Стандартный пример из Дейкстры.Если я правильно понял Info21, поиск значения =xвarrNxM будет выглядеть так:## Код:
```
VAR 
   arr: ARRAY N, M OF INTEGER;
   i, k: INTEGER;
BEGIN
   i := 0;
   k := 0;
   WHILE (k < M) & ~(arr [i, k] = x) DO
      INC (i);
      IF i = N THEN
         i := 0;
         INC (k)
      END
   END;
   POST: (i >= N) OR (k >= M) OR (arr [i, k] = x)
END
```
