Вычислите кол-во натуральных двузначных нечетных чисел не делящихся ** 5 (паскаль абс)

Question

Вычислите кол-во натуральных двузначных нечетных чисел не делящихся на 5 (паскаль абс)

Answer 1

Program z_1;

var k,i:integer;

  begin  

k:=0;

    for i:=10 to 99 do

      if (i mod 2<>0) and (i mod 5<>0) then k:=k+1;

     write(k);

      end.