Войти
Регистрация
Спроси ai-bota
unkn0wned
17.09.2022 02:05
Задан массив, состоящий из 33 элементов, являющихся случайными числами из диапазона (-20, 60). вывести на экран числа, большие 40, а также их сумму. на языке паскаль. 15б
Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
alenas000
27.09.2022 06:50
очистки носителя от ненужной текстовой информации является 1) недостатком 2) преимуществом 1) тридиц. бум. книги 2) электронной книги...
Officilskilegor
18.03.2020 07:59
3) Определите значение переменной c после выполнения следующего фрагмента программы: a := -5; b := 3; a := a - b*2; if a b then c := b - a else c := a – b; 4) Значения двух массивов...
pigurska
30.10.2022 03:35
. Что изучает информатика? а) конструкцию компьютера; б представления, накопления обработки информации с технических средств; в) компьютерные программы; г) общешкольные дисциплины....
Taras229
15.05.2022 15:09
с информатикой! ответьте на 1 во Какие особенности вы можете отметить при решении задач на компьютере? Приведите примеры...
horizontal
22.06.2020 08:00
Укажите примеры образных информационных моделей по быстрее ...
galinarezeda59
08.03.2020 17:33
Какому логическому выражению соответствует таблица истинности (фото) AvB AvB (черточка над А) A^B A^B (черточка над всем выражением)...
Kirillchakilev
01.08.2021 06:36
Вычислите: (1 ∧ 0) ∨ 1 )∧ (1 ∨A )...
epifya
16.02.2020 08:12
В какой программе созданы следущие файлы house. Doc house. Bmp...
CorrupteD
20.12.2022 05:47
Для условий задачи 2 запишите в символической форме высказывание: Если поездка в Италию стоит недорого, то летом я поеду в Италию....
Ulugbek9i
14.05.2023 21:02
1)определите имя файла , которое закадировано.в этом тебе три маски , соответствующие имена этого файла: *d* g*s? ? ? о* ответы: 1) goodes 2) goodess 3) godess 2)установите соответствие...
Ответ:
anatoy
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 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота