Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
AngelinaMon1
01.03.2022 19:25 •
Информатика
По информатике paskal; заполнить массив натуральными числами от 5 до 15 , все четные числа разделить на два и вывести на экран сумму элементов.
Ответ:
sapeglub
01.09.2020 20:24
// PascalABC.NET 3.3
begin
var a:=ArrRandom(20,5,15); a.Println;
a:=a.Select(x->x mod 2=0?x div 2:x).ToArray;
a.Println;
writeln('s = ',a.Sum);
end.
Пример:
6 13 7 10 12 13 11 13 9 12 5 15 13 7 12 13 14 9 12 6
3 13 7 5 6 13 11 13 9 6 5 15 13 7 6 13 7 9 6 3
s = 170
0,0
(0 оценок)
Популярные вопросы: Информатика
Джерико
30.09.2021 16:33
Создайте базу данных «Мои друзья», используя следующие типы полей: текстовое, числовое, дата / время, логическое...
timon7901
04.10.2021 07:23
Python Написать программу, выводящую на консоль все числа от 1 до 1000. Найти сумму всех чисел...
Aynur123455
07.10.2022 20:19
Информатика 6 класс 2 тоқсан Бжб...
дРуЗьЯ007
19.06.2020 23:48
Информатика 6а класс 2 тоқсан тжб отныш...
shilinvanechka
24.05.2023 10:30
Как сделать эту штуку нормальной?...
KREZZOR
10.04.2022 09:26
Диаграммы MS Exsel строят на основе: А. Выделенных ячеек таблицы Б. Данных таблицы В. Активной книги ...
xxxxxxxx13
27.02.2022 01:38
Дан номер года (положительное целое число). Определить количество дней в этом году, учитывая, что обычный год насчитывает 365 дней, а високосный — 366 дней. Високосным считается...
dashapetiaeva
30.06.2022 16:59
Как называется в компе тот вещь каторый двигается с мышки....
vazirasharipovа
31.03.2020 17:53
ИНФОРМАТИКА а) текст б) графика в) звук г) видео д) архивные е) исполняемые 1) bmp 6) zip 11) com 16) bat 2) mov 7) mp3 12) avi 17) txt 3) exe 8) rtf 13) wav 18) midi 4) doc...
sunksy
15.05.2021 10:02
1. Откройте через браузер документ 100.rtf (нажми на ссылку) и прочитайте стихотворение Л. Кондратенко: Цитата У про100го 100рожа Непро100рный дом: Часто в нем 100ножка Бродит...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
var a:=ArrRandom(20,5,15); a.Println;
a:=a.Select(x->x mod 2=0?x div 2:x).ToArray;
a.Println;
writeln('s = ',a.Sum);
end.
Пример:
6 13 7 10 12 13 11 13 9 12 5 15 13 7 12 13 14 9 12 6
3 13 7 5 6 13 11 13 9 6 5 15 13 7 6 13 7 9 6 3
s = 170