Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Катя20030000
04.11.2020 17:15 •
Информатика
Составить программу, которая считывает 6 чисел, и выводит сумму неположительных чисел. pascal
Ответ:
den751
09.10.2020 15:05
begin
var n := 6;
var a := ReadSeqReal(n).ToList;
a.Where(x->x<0).Sum.Println;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
nikolay946
18.03.2021 10:45
Можно ли считать алгоритмом текст написанный на нотной бумаге?...
Rukishka05
14.07.2022 19:31
Написать программу на паскале, которая для заданных x и n вычисляет: , где n=количество членов ряда....
2x2466
01.02.2021 05:34
Очень нужна хотя бы какие-то во желательно быстро, 8 класс....
Марина36843
25.04.2020 18:36
Определите значение переменной a после выполнения алгоритма. a : = 0 b ; = 2 b ; = 2+a+4*b a : = b/2*a КОНЕЦ граждане....
Denis7788
03.11.2021 13:31
Файл размером 256 Кбайт передаётся через некоторое соединение со скоростью 1024 бит в секунду. Определите размер файла (в Кбайт), который можно передать за то же время через другое...
Danilenok
10.06.2022 11:55
Що з переліченого НЕ належить до інтернет-речей? * 1.кероване мобільним телефоном ввімкнення світла 2.керований мобільним телефоном чайник 3.керований мобільним телефоном принтер...
skkzrjyltcm2005
16.12.2021 06:19
Выразите температуру тела по шкале Кельвина....
leloneltt
03.08.2020 13:41
По тюрской мифологии мир порядка, света, где для каждого существа есть свое место: а) верхний б) средний в) сотворенный ...
dashafirman
03.08.2020 13:41
решить примеры: 1) запишите 3/125 в виде десятичной дроби; 2.) представьте число 0,8 в виде десятичной дроби; 3) Выполните действия 6 9/10 + 4 7/10; 4)Выполните действия 10 1/7...
zdima2939
07.04.2021 08:37
Выразите в основных единицах 18 см/мин...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
var n := 6;
var a := ReadSeqReal(n).ToList;
a.Where(x->x<0).Sum.Println;
end.