• Напишите программу, которая вводит массив из N целых чисел и выводит на экран элементы, кратные числу K. Протестировать программу на следующих исходных данных:
    а) k=3 Массив: 2 6 -9 4 5 12 -15
    б) k=4 Массив: 9 0 8 124 -16 11 19

Ответы 1

  • begin   var ar := readarrinteger(readinteger('Введите n:'));   var k := readinteger('Введите k:');   ar.Where(x -> x mod k = 0).print; end. 
  • Добавить свой ответ

Войти через Google

или

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

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

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