Задача №8873 Одноцифрове число

Задано ціле число n. Вивести Ok, якщо число n одноцифрове та No у протилежному випадку.

Вхідні дані

Одне ціле число n.

Вихідні дані

Вивести Ok, якщо число n одноцифрове, та No інакше.

Розв’язок

var x: integer;
begin
  readln(x);
  if(x >= -9) and (x <= 9) then
    writeln('Ok')
  else
    writeln('No')
end.