Question

определите является ли заданное число А нечетным двузначным числом

Answer 1

var
a:longint;
begin
read(a);
if (a div 10<>0) and ((a div 10)<10) and (a mod 2=1) then writeln('Yes') else writeln('No');
end.