Вопрос задан 01.04.2018 в 04:14. Предмет Информатика. Спрашивает Коротков Виталик.

Заполнить массив случайными числами (положительными и отрицательными) из произвольного диапазона. Вы

вести созданный массив на экран, расположив элементы в одну строку через пробелы. Посчитать общее количество элементов, кратных 3 и нечетных элементов и вывести на экран

Ответы на вопрос

Отвечу на вопрос мгновенно! Нейросеть ChatGPT. Жми!
Отвечает Кулина Лика.

// PascalABC.NET 3.1, сборка 1250 от 28.05.2016
begin
  var a:=ArrRandom(ReadInteger('n='),-99,99); a.Println;
  var k3:=a.Where(x->x mod 3=0).Count;
  var kOdd:=a.Where(x->x.IsOdd).Count;
  Writeln('Элементов, кратных 3: ',k3);
  Writeln('Нечетных элементов: ',kOdd);
  Writeln('В сумме и тех, и других: ',k3+kOdd)
end.

Тестовое решение
n= 15
-40 39 58 -85 -61 -49 -9 -67 11 -20 -67 -33 -97 66 33
Элементов, кратных 3: 5
Нечетных элементов: 11
В сумме и тех, и других: 16

Спроси у Chat GPT бесплатно без регистрации!

Последние заданные вопросы в категории Информатика

Информатика 03.06.2023 05:01 2 Кузьмин Демьян.
Ответов: 1
Информатика 03.06.2023 05:04 5 Иванов Денис.
Ответов: 1
Информатика 03.06.2023 05:39 3 Крюковский Артем.
Ответов: 1
Информатика 03.06.2023 05:15 2 Мальцев Данил.
Ответов: 1
Информатика 03.06.2023 05:14 3 Мамаев Максим.
Ответов: 2
Информатика 03.06.2023 05:00 2 Ким Елена.
Ответов: 1
Информатика 03.06.2023 05:02 2 Арланцев Артём.
Ответов: 1
Информатика 03.06.2023 05:36 3 Кривицкая Ульяна.
Ответов: 1
Информатика 03.06.2023 05:36 2 Фефелов Лёша.
Ответов: 2
Информатика 03.06.2023 05:36 2 Пилипенко Максим.
Ответов: 1
< Предыдущий Следующий >
Предметы