Категория
Информатика, опубликовано 18.04.2019 06:30

Дан массив целых чисел, состоящий из 30 элементов. заполнить его с любым удобным для вас способом. найти: сумму элементов массива, имеющих нечетное значение; вывести индексы тех элементов, значения которых больше заданного
числа а (а вводится с клавиатуры); определить, есть ли в данном массиве положительные элементы, кратные k ( k вводится с клавиатуры)

Ответы

Ответ
Ответ оставил: Гость
Pascalabc.net 3.4.2, сборка 1887 от 30.11.2018 внимание! если программа не работает, обновите версию!

begin

  var a : = arrrandom(30, -50, 50);

  a.println;

  writeln('сумма нечетных значений равна ', a.where(t -> t.isodd).sum);

  var n : = readinteger('a=');

  print('искомые индексы: ');

  a.select((v, i)-> (v, i + (t -> t[0] > n)

      .select(t -> t[1]).println;

  n : = readinteger('k=');

  if a.any(t -> t mod n = 0) then println('есть кратные')

  else println('нет кратных')

end.

Ответ
Ответ оставил: Гость
Частное будет меньше 1 если b будет больше a
Ответ
Ответ оставил: Гость
Рифма какой то песни что ли?

Ответ
Ответ оставил: Гость
Помоему
6 . 257 бит
Надеюсь хоть один смог помоч
Удачи не отмечайте как нарушение


Другие вопросы по информатике

Вопрос
Информатика, опубликовано 09.01.2019 16:01
Вопрос
Информатика, опубликовано 09.01.2019 16:01
Вопрос
Информатика, опубликовано 09.01.2019 16:01
✅ Ответов: 3 на вопрос по информатике: Дан массив целых чисел, состоящий из 30 элементов. заполнить его с любым удобным для вас способом. найти: сумму элементов массива, имеющих нечетное значение; вывести индексы тех элементов, значения которых больше заданногочисла а (а вводится с клавиатуры); определить, есть ли в данном массиве положительные элементы, кратные k ( k вводится с клавиат... ты найдешь на сайте. Также ты можешь добавить свой вариант ответа, если считаешь, что он не верен или твой ответ более полный. Пожалуйста, добавляй только правильные ответы.
Вконтакте Youtube