Задача №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.