Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
barmeb11
30.12.2022 11:33 •
Информатика
Вмассиве с={1,2,-3,0,-1,-7,-9,9,10,-3} найти количество соседств двух положительных и количество соседств двух отрицательных элементов массива
Показать ответ
Ответ:
asdfghjkl6tygb
04.10.2020 10:59
//PascalABC.Net 3.1 сборка 1200
var
c: array of integer := (1, 2, -3, 0, -1, -7, -9, 9, 10, -3);
begin
// c := ArrRandomInteger(10, -10, 10);
Println(c);
Writeln(c.Pairwise().Where(x -> x.Item1 * x.Item2 > 0));
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
глупыйенот
22.03.2020 05:16
111111111111111111111111111111111111111111...
manazoid
22.05.2021 18:42
Укажите количество целых чисел в диапазоне от 700700 700 до 800800 800 (включительно), таких, что остаток от деления суммы нечетных цифр числа на 77 7 равен 66 6....
nvlasc
03.07.2020 03:29
Данная область в программе Microsoft Word называется…...
vikysyakurinna
12.06.2020 22:59
Вочереди стоят мальчики и девочки. в начале каждой минуты, если за каким-то мальчиком стоит девочка, то он меняется с ней местами, пропуская ее вперед (суммарное количество...
malia20092004
29.11.2020 00:09
Решите программу в pascal: x=y^2-sqrt(y), при y =0; x=3/y+y, при y 0. напишите решение программы....
Taimy
29.11.2020 00:09
Куда закачиваются игры на ноутбуке на оперативную память или на собственную...
Dzoker34
29.11.2020 00:09
Вася составляет 3-буквенные слова, в которых есть только буквы к, р, а, н, причём буква а используется в каждом слове хотя бы 1 раз. каждая из других допустимых букв может...
arsenkam
28.06.2021 12:47
Вычислите сумму чисел х и у, при х = d616, у = 368. ответ запишите в двоичной системе счисления....
Алена11д1
28.06.2021 12:47
Чему равна сумма чисел 138 и 1316? результат запишите в двоичной системе счисления. =)...
buharowaalina
19.04.2022 01:42
Интересная книга о компьютерах. авторы...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
c: array of integer := (1, 2, -3, 0, -1, -7, -9, 9, 10, -3);
begin
// c := ArrRandomInteger(10, -10, 10);
Println(c);
Writeln(c.Pairwise().Where(x -> x.Item1 * x.Item2 > 0));
end.