Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Alina12345611109
13.04.2020 19:23 •
Информатика
Задан массив, состоящий из 33 элементов, являющихся случайными числами из диапазона (-20, 60). вывести на экран числа, большие 40, а также их сумму. на языке паскаль. 15б
Показать ответ
Ответ:
sot58
08.10.2020 20:03
PascalABC.NET 3.4.0, сборка 1670 от 23.05.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(33,-20,60); a.Println;
a.Where(t->t>40).Println.Sum.Println
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
vipmurlyan
12.08.2021 02:15
3) с клавиатуры вводится три целых числа а, b, c. на экран выводится наибольшее и наименьшее число из этих трех....
sapesalex
21.04.2023 17:40
2) решение квадратного уравнения ax^2+bx+c= 0 при любых значениях коэффициентов а, b, c. коэффициенты уравнения вводятся с клавиатуры, решения выводятся на экран...
petrosiannikita
04.09.2022 13:40
1) ввести с клавиатуры вещественные коэффициенты многочлена и значение x. вывести значение многочлена z=a+bx^2+cx^3+dx^4...
аььарпашишки
28.06.2020 23:51
Укажите что будет происходить с фрагментами рисунка если при применении метода draw установить значение свойства transparentcolor и присвоить значение символьной константы...
ваня2007123
28.11.2020 20:08
Задана прямоугольная таблица a[n, m]. элементы таблицы b[n, m] удовлетворяют следующему свойству: элемент b[i, j] равен сумме элементов таблицы a, расположенных строго левее...
dreadman989
04.12.2020 06:07
Определите, что получится в результате выполнения в графическом редакторе следующей последовательности действий: 1). установить основной цвет желтый. 2). выбрать инструмент...
kitiry
06.09.2020 22:00
решить задание по иныорматике...
АкадемеG
15.01.2023 16:13
Отвечает за создание саундтрека компьютерной игры . 10 букв. Третья м...
vintageflower
18.02.2023 21:27
Как называют человека отвечающий за создание 2д и 3д графики 8 букв. Вторая буква н...
РостиславФедоренко
03.05.2021 10:38
Переведите числа: а) 101010 во 2 ст. из двоичной системы счисления в десятичную; б) 74в 10 ст.=? во 2 ст....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(33,-20,60); a.Println;
a.Where(t->t>40).Println.Sum.Println
end.