Войти
Регистрация
Спроси ai-bota
киреева2
20.04.2020 14:32
Pascal abc . заполнить массив из 10-ти элементов целыми случайными числами в диапазоне [ – 20; 20], вычислить сумму положительных элементов массива
Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
Простокнигоманка
03.12.2022 05:57
решить практическую по информатике...
katyamm11
10.03.2023 18:57
Информатика Арифметическое уровнение для вычисления суммы первых 4-х компонентов элемента x: с первые2 и yвторые 2...
Катюха123Печенька
08.07.2021 23:31
Воспользуйтесь схемой Горнера для представления чисел: 12345{10} ; 12345{8} ; 0.12345{6}...
Mirskaya
09.10.2022 18:39
ОТВЕЧАЕМ ВОПРОСЫ.Какими были первые инструменты для счета?Как в различных странах назывались счеты?В каком году появилась логарифмическая линейка? ...
lol1027
07.10.2021 04:12
Написать программу которая вводит вводит массив из 5 целых чисел и выводит на экран сам массив и сумму всех его элементов...
kulisenok
07.10.2021 04:12
Дано действительное число r вида nnn.ddd (три цифровых разряда в целой и дробной частях). поменять местами дробную и целую части числа и вывести полученное значение...
Rita53
07.10.2021 04:12
Что такое информационная деятельность ? опиши свою информационную деятельность в учебе ....
Gllodory
07.10.2021 04:12
Информационная деятельность в учебе ?...
Dashaass554
04.12.2021 13:20
Какой какой объем памяти в байтах будет занимать следующий двоичный код 001 000011101111 00 00 11 0 11 00 111011101 поясните свой ответ...
Silvertrue
16.05.2023 11:48
Текст объемом 1024 бита располагается в оперативной памяти начиная с байта с номером 10. каков будет адрес последнего байта который знает данным данным текстом...
Ответ:
Julli0Kub
08.10.2020 13:01
PascalABC.NET 3.3.5, сборка 1660 от 20.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(10,-20,20); a.Println;
Writeln('Сумма положительных равна ',a.Where(t->t>0).Sum)
end.
Пример
-3 -19 10 5 14 13 -1 0 -2 -12
Сумма положительных равна 42
0,0
(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота