Составьте программу,которая определяет является ли введенное целое число нечетным двузначным. очень срочно

Program n1;
var a: integer;
begin
readln(a);
if (abs(a)>9) and (abs(a)<100) and (a mod 2<>0) then write('является') else write('не является');
end.