Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
dastanemilbeko
31.05.2021 06:47 •
Информатика
Задан массив, состоящий из 33 элементов, являющихся случайными числами из диапазона (-20, 60). вывести на экран числа, большие 40, а также их сумму. на языке паскаль. 15б
Ответ:
anna20032004
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 оценок)
Популярные вопросы: Информатика
yuostroi
11.05.2021 01:53
Опишите формы использования ИКТ,с которыми вам приходилось иметь дело в школе.Какой эффект от их использования вы можете отметить?Подготовить сообщение....
vdyblenkoo
23.03.2023 20:08
Какой команде в буквенной нотации соответствует команда в числовой нотации chmod 754 f3? 1) chmod u+rwx,g+rx,o+r f3 2) chmod u=rwx f3 3) chmod o+r f3 4) chmod g=rx...
zizizineb99
04.04.2020 02:25
С++ Опрeдeлить кaкoму врeмeни сутoк сooтвeтствуeт oпрeдeлeннoe числo: 1-6(нoчь), 7-12(утрo), 13-18(дeнь), 18-24(вeчeр)...
semakina97
17.10.2020 03:23
Составить по информатике со словами если и то....
PoL811
13.02.2021 20:44
Как по икт сделать снеговика в abc паскаль напишите программу...
yaya4
09.11.2021 12:06
Назовите программу-переводчик текста....
софия20042009
11.11.2020 04:56
Переведите из десятичной в двоичную : 670 можно с объяснением ....
vikammirkushaoz9agx
01.12.2021 10:03
Данные объемом 80 мбайт из пункта а в пункт б по каналу связи, обеспечивающему скорость передачи данных 2∧23 бит в секунду, а затем из пункта б в пункт в по каналу...
shok0
24.02.2020 08:27
Составьте блок-схему, программу: определите кратно ли число а 5,7,11?...
magmadi1
24.02.2020 08:27
Напишите в турбо паскале движение объекта, квадрата ! не сложно для класса 6-8...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(33,-20,60); a.Println;
a.Where(t->t>40).Println.Sum.Println
end.