Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
ЗнающийМудрец
13.02.2021 02:08 •
Информатика
Программирование pascal (0,-1.9,2.9,7.5,-3,1.86,-1,-3.5,-0.5,5) составить программу вычисления суммы элементов массива a значения которых принадлежат интервалу [-3,3] проверить работу программы на заданном участке a(10) значения сверху
Ответ:
zhaslanovd
09.10.2020 02:18
PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018Внимание! Если программа не работает, обновите версию!
begin
ReadSeqReal('=>', ReadInteger('n=')).Where(t -> Abs(t) <= 3).Sum.Println
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Helokiti2343
19.02.2022 04:45
Зделайте задания в презентации...
ksusha00008
12.01.2022 07:18
Число 1010101 в восьмиразрядном представлении имеет вид...
nataliakonstan1
31.08.2022 02:42
Один из первых отечественных пк бк-0010 имел оперативную память 16 кбайт. сколько страниц текста можно было разместить в памяти этого компьютера, если на странице размещается...
krashakova
05.01.2023 03:12
Построить график функции у=ln(x), где х - прогрессия с шагом 1,5 на отрезке [1; 400]...
Анна200361
16.07.2021 12:02
Какие команды должны быть у робота, выполняющего функции: а) кассира в магазине; б) дворника; в) охранника?...
Zloo6024600
20.04.2020 15:15
Расположить в порядке возростания 1 байт 7 бит 1025 байт 1 кбайт...
fox370
03.12.2022 00:09
Число 236 и 4453 перевести в двоичную систему быстрее...
Кирюха55555
10.08.2021 01:37
А) Дано натуральное число, определить количество цифр «5» в нем...
Doplis
08.09.2022 11:01
ответ:our athlete is Golovkin.it is very cool and beautiful. and a very......
apiloota
08.09.2022 11:01
Арман бір сан ойлап,оны 2 ге бөлді. нәтижесін 302 есе арттырғанда,82478 саны шықты. Арман қандай сан ойлады комектесиндерши...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
ReadSeqReal('=>', ReadInteger('n=')).Where(t -> Abs(t) <= 3).Sum.Println
end.