рассмотрите n целых случайных чисел из промежутка -240,240 подсчитать кол во

Осмотрите n целых случайных чисел из промежутка -240,240 подсчитать кол во положительных чисел кратных 6

Задать свой вопрос
Крысанычев Артем
с++?
1 ответ

// PascalABC.NET 3.4.2, сборка 1785 от 06.09.2018

// Внимание! Если программка не работает, обновите версию!

begin

 var a := ArrRandom(ReadInteger('n='), -240, 240); a.Println;

 Println('Количество подолжительных частей, кратных 6:',

     a.Where(t -gt; (t gt; 0) and (t mod 6 = 0)).Count)

end.

Степан
У Вас махонькая опечатка: числа, кратные 6
Вероника
Да, мелкий шрифт, соединилось/ Надо заменить 5 на 6, окончательно.
Викулька Тюлеева
Grimmy, вот что за нарушение ты отметил с разъяснением "просьба"?
Илья Петронкин
Модерация публично не дискуссируется. Либо личка, либо жалоба Админу ))
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт