Задача 4 Урок 10.1

Задача 4 Урок 10.1

Выведите на экран, все нечетные числа, делящиеся на 3 нацело, лежащие в диапазоне от 35 до 117

var a:integer;
begin
  for a:= 35 to 117 do
      if ((a mod 3 = 0)) then
           write(a, ' ');
  readln();
end.    

var a:integer;
begin
  for a:= 35 to 117 do
      if ((a mod 3) = 0) then // скобки перепутал
           write(a, ' ');
  readln();
end.

здесь нужно добавить проверку на нечетность

var a:integer;
begin
  for a:= 35 to 117 do
      if ((a mod 3) = 0) AND ((a mod 2) = 1) then //  проверка на нечетность
           write(a, ' ');
  readln();
end. 

так?