Нужна . дано одно число. определить, двузначное ли оно. входные данные: 200 выходные: no

Если ты имел в виду ЯП паскаль,то вот:
VAR x:integer;
begin
write('vvedite chislo');readln(x);
if ((x>9) and (x<100)) then writeln('YES') else writeln('NO');
end.