Определите является ли заданное число А нечетным двузначным числом
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.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
