Дана последовательность реальных чисел а1,а2,...,аn . Вывести на печать элементы

Дана последовательность реальных чисел а1,а2,...,аn . Вывести на печать элементы массива не кратные 3.

Задать свой вопрос
Света Полтавцченко
Я не понял, почему дана ПОСЛЕДОВАТЕЛЬНОСТЬ, а выводить надо элементы МАССИВА?
Семик Эммауский
Я не сообразил, почему дана ПОСЛЕДОВАТЕЛЬНОСТЬ, а выводить надобно элементы МАССИВА?
1 ответ
PascalABC.NET 3.4.0, сборка 1672 от 10.06.2018
Внимание! Если программка не работает, обновите версию!

begin
  var n:=ReadInteger('n=');
  var a:array of real;
  a:=SeqRandom(n,-99,99).Select(t-gt;real(t)).ToArray; a.Println; Writeln;
  a.Where(t-gt;Trunc(t) mod 3 lt;gt;0).Println
end.
Тимукас Лидия
В задании написано не кратные 3,тоесть числа которые не делятся на 3.А числа 12 и 99 делятся на 3.
Виталик Аленченков
А блин увидел.
Владимир
В задании написано не кратные 3,тоесть числа которые не делятся на 3.А числа 12 и 99 делятся на 3.
Igor Bendin
А блин увидел.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт