дано натуральное число больше либо равно нулю если не отрицательное то вычесть 50 иначе вычесть 100

PascalABC.NET 3.3.5, сборка 1660 от 20.04.2018Внимание! Если программа не работает, обновите версию!begin  var n:=ReadInteger;  if n>=0 then n-=50 else n-=100;  Writeln(n);end.Условие некорректно. Натуральное число всегда больше нуля. Поэтому задача решена для такого условия:"Дано ЦЕЛОЕ число. Если оно не отрицательное, то вычесть 50, иначе вычесть 100"