מילת היחס not

לדוגמא,אם A לא שווה B   אזי הצב במשתנה X את הערך 3:

דוגמא:

כתוב תוכנית הקולטת מספרים ומדפיסה אותם. קליטת המספרים נמשכת כל עוד נקלטים מספרים חיוביים.

פיתרון:

program NAME; var      X:real; begin      readln(X);      while  (not(X<0) )  do      begin            writeln(X);            readln(X);      end; end.

 להורדת הדוגמא לחץ כאן

כלומר, רק כאשר כל התנאי שלאחר המלה while   הוא אמת, תתבצע הלולאה.