Помогите сделать: Даны целые числа k, m, n. написать программу которая определяет верно ли что все три числа нечетные

Program n1;var k,m,n: integer;beginreadln(k,m,n);if (k mod 2<>0) and (m mod 2<>0) and (n mod 2<>0) then write('да') else write('нет');end.