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

Вопрос от пользователя: Танюта

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

Ответ: Оля

Program n1;

var k, m, n: integer;

begin

readln (k, m, n);

if (k mod 20) and (m mod 20) and (n mod 20) then write (‘да’) else write (‘нет’);

end.