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

Ответы 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.

    • Автор:

      pecansun9
    • 5 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years