Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
alina28551
03.05.2020 10:49 •
Информатика
Обработка числовых последовательностей 1.
дана непустая последовательность положительных целых чисел , a1 a2 , оканчивающаяся нулём. получить a1 ,a1 a2 ,a1 a2 a3 .
в с++
.
👇
Увидеть ответ
Открыть все ответы
Ответ:
ТанечкаКоновалова
03.05.2020
Четное число делится на два, а кратное пяти делится на пять, поэтому число должно делиться без остатка на 2х5=10
// PascalABC.NET 3.0,сборка 1076
begin
var n:=ReadInteger('Длина последовательности: ');
var a:=ArrRandom(n,-50,50);
Writeln('Исходная последовательность');
a.Println;
Writeln('Сумма элементов: ',a.Sum);
Write('Кол-во четных, кратных пяти: ');
Writeln(a.Where(x-> x mod 10 = 0).Count)
end.
Тестовое решение:
Длина последовательности: 20
Исходная последовательность
-4 21 -21 -23 14 -39 -12 1 -7 4 17 -45 30 -48 -19 -12 27 -46 -37 15
Сумма элементов: -184
Кол-во четных, кратных пяти: 1
4,5
(51 оценок)
Ответ:
zekisroman
03.05.2020
Четное число делится на два, а кратное пяти делится на пять, поэтому число должно делиться без остатка на 2х5=10
// PascalABC.NET 3.0,сборка 1076
begin
var n:=ReadInteger('Длина последовательности: ');
var a:=ArrRandom(n,-50,50);
Writeln('Исходная последовательность');
a.Println;
Writeln('Сумма элементов: ',a.Sum);
Write('Кол-во четных, кратных пяти: ');
Writeln(a.Where(x-> x mod 10 = 0).Count)
end.
Тестовое решение:
Длина последовательности: 20
Исходная последовательность
-4 21 -21 -23 14 -39 -12 1 -7 4 17 -45 30 -48 -19 -12 27 -46 -37 15
Сумма элементов: -184
Кол-во четных, кратных пяти: 1
4,7
(76 оценок)
Это интересно:
Х
Хобби-и-рукоделие
14.04.2021
Завязывание скользящих узлов на ожерелье: профессиональный подход...
О
Образование-и-коммуникации
26.04.2020
Лучшие способы самостоятельно создать аэрогель...
З
Здоровье
21.04.2021
Как распознать экзему: симптомы и признаки...
К
Компьютеры-и-электроника
30.05.2020
Навсегда избавьтесь от истории Skype: подробная инструкция...
Х
Хобби-и-рукоделие
04.10.2022
Как сделать зажигалку: пользовательская инструкция...
М
Мир-работы
30.04.2023
Как получить работу мечты: 5 шагов к успеху...
К
Кулинария-и-гостеприимство
20.11.2022
Как заморозить овощи: полезные советы и рекомендации...
26.01.2022
Как стать центром внимания: справляемся с ролью новой девушки в старших классах...
П
Путешествия
15.04.2023
Как справиться с воздушной болезнью в самолете...
И
Искусство-и-развлечения
05.04.2022
Как самостоятельно быстро научиться играть на акустической гитаре...
Новые ответы от MOGZ: Информатика
OVRBTZ
30.01.2021
Как вывести цифровой корень числа? язык с....
jjjonh9746
26.08.2020
Составить алгоритм управления Чертёжником, в результате которого на координатной плоскости будет нарисован квадрат, длина стороны которого равна 7 единицам. Алгоритм: сместиться...
Relax111111
08.06.2023
Информатика Чему равен z, если k:=3...
регинамаг
25.08.2020
Куплю курсовую! С++ Файл в закрепе, цены предлагайте, обсудим все по почте....
mrfotuna14
23.02.2022
Задача на While. Написать программу, которая выводит на экран значение y2 (y=1,2,3,4,5) в возрастающем порядке, и убывающем порядке, например 1 4 9 16 25 и 25 16 9 4 1...
kirillmich16
18.07.2022
Установите соответствие между словами -- A) терпкий 1) нос B) шероховатый 2) язык C) удушливый 3)кожа...
katerinarakova
13.04.2021
Як ми вшановуємо память про українське козацтво?...
lyba228337ggg
28.03.2023
Точка о центр окружности угол acb =25 градусов найдите величину угла aob (в градусах )...
Dmitro222
28.03.2023
Составьте формулы оснований следующих металлов и назовите их 1 калия...
Settiko
28.03.2023
Частотный диапозон рояля от 91 до 9001 гц. найти диапазон длие звуковых волн в воздухе?...
MOGZ ответил
аж Площа Італії разом з островами становить приблизно 309 500 км(2), а площа...
Когда создали мобильный телефон...
Решите задачу. Сколько молей содержится в 4 г водорода?...
на клеточном поле со стороной квадратной клетки 1 см фигура найди площадь...
Решите уравнение 7 класс 6х²+7х*3=0 и 3х²-5х-2=0...
Число 38, якщо c1 = 8, а різниця прогресії d = 1,4 ?...
223. собственная скорость судна составляет 32,6 км / ч, а текущая скорость...
Хлопчик поднимаясь ступеньками достиг скорости 150 ват, какую работу он выполнил...
Решите тест уважаемые друзья...
Приведите примеры произведений пластического искусства из области архитектуры...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
// PascalABC.NET 3.0,сборка 1076
begin
var n:=ReadInteger('Длина последовательности: ');
var a:=ArrRandom(n,-50,50);
Writeln('Исходная последовательность');
a.Println;
Writeln('Сумма элементов: ',a.Sum);
Write('Кол-во четных, кратных пяти: ');
Writeln(a.Where(x-> x mod 10 = 0).Count)
end.
Тестовое решение:
Длина последовательности: 20
Исходная последовательность
-4 21 -21 -23 14 -39 -12 1 -7 4 17 -45 30 -48 -19 -12 27 -46 -37 15
Сумма элементов: -184
Кол-во четных, кратных пяти: 1