Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
liza7634578
27.10.2020 12:46 •
Информатика
Синформатикой! написать программу в паскале заполнить массив 100 произвольных чисел.определить сумму чисел которая > 20 но < 80
Показать ответ
Ответ:
michukdblack
07.10.2020 21:38
// PascalABC.NET 3.3, сборка 1627 от 27.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
var mas:=ArrRandom(100,-99,99);
var r:=mas.Where(t->(t>20) and (t<80));
Writeln('Summa=',r.Sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
xottabыs4
19.04.2021 18:49
НАПИСАТЬ КОД НА ПИТОНЕ! На вход программе поступает набор чисел в диапазоне [10; 10000]. Необходимо узнать сколько чисел в массиве находятся в диапазоне между средним значением...
19729ром
17.04.2021 11:36
Данный блок-схема является программируемой. блок-схема на языке программирования Python...
Angela280
28.05.2022 16:42
написать код на движение wasd (В Unity)...
mstasya04
27.09.2022 01:06
Как вы думаете, можно ли использовать компьютерные презентации как самостоятельные документы? Почему? 2. Как вы считаете, нужно ли писать план (сценарий) презентации? ответ обоснуйте....
kalishevij99
29.07.2022 20:10
Не существенным свойством будем называть такое которое не является важным для нас в данной ситуации....
s7mart
04.05.2023 06:04
Какое слово не является деепричастием: сидя.понимающе.зпершись.узнавая...
УРОК000
04.05.2023 06:04
На шахматной доске 7 чёрных фигур их на 3 больше чем белых сколько белых фигур на доске...
р6661
04.05.2023 06:04
30 ! окружность х^2 + у^2 = 16 разбивает множество не принадлежащих ей точек координатной плоскости на две области — внутреннюю и внешнюю. какой из этих областей принадлежит...
totoralol
04.05.2023 06:04
Какое значение имело культурное наследие петра великого...
LilClayne
04.05.2023 06:04
Між якими планетами існує пояс астероїдів...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// Внимание! Если программа не работает, обновите версию!
begin
var mas:=ArrRandom(100,-99,99);
var r:=mas.Where(t->(t>20) and (t<80));
Writeln('Summa=',r.Sum);
end.