Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
alianna366
07.04.2021 22:39 •
Информатика
Составить алгоритм и программу. -23 ; 15 ; 32 ; 0 ; -56 ; 87 ; 7 - массивы. посчитать кол-во элементов массива ,которые больше нуля
Показать ответ
Ответ:
84737263748
07.10.2020 06:28
// PascalABC.NET 3.3, сборка 1573 от 04.11.2017
// Внимание! Если программа не работает, обновите версию!
begin
var a:=Arr(-23,15,32,0,-56,87,7); a.Println;
Writeln('Кол-во элементов, больших нуля: ',a.Where(t->t>0).Count)
end.
Результат
-23 15 32 0 -56 87 7
Кол-во элементов, больших нуля: 4
0,0
(0 оценок)
Ответ:
AIDA902231
07.10.2020 06:28
Вот нужная программа. Суда прямо и вводи: -23 15 32 0 -56 87 7, только не вставь лишних пробелов
0,0
(0 оценок)
Популярные вопросы: Информатика
1DLove11
18.02.2023 15:29
Имеется файл с текстом из 22000 символов. при наборе текста использовался компьютерный алфавит. текст необходимо скопировать на диск, на котором имеется свободная...
Zazasalka174
08.08.2020 10:31
9. 75 ) условно клавиши клавиатуры можно разбить на следующиегруппы: 1) функциональные2) формальные3) символьные4) первичные5) курсором6) главные7) специальные8)...
omar2007
31.10.2020 15:33
Заяц | волк 356заяц. 201волк. 237в языке запросов поискового сервера сервера для обозначения логической операции или используется символ | от логической операции...
nastena544
19.03.2023 14:03
Обьяснить,знаки препинания в предложениях.почему ставятся след.знаки препинания? ,построить схемы предложений: 10.(на чердаке) в окна, косо вы резанные в крыше, были...
aiganymAbz
19.03.2023 14:03
Обьяснить,знаки препинания в предложениях.почему ставятся след.знаки препинания? ,построить схемы предложений: (о подвиге) 1.я знал многих героев на войне, и их храбрость,...
qwerty1352
19.03.2023 14:03
Найти множество значений функции: y = 10 - 8*cos²9x * sin²9x....
vladislavserov
19.03.2023 14:03
Алёшка( краткое содержание) автор : никул эркай...
regina1002
24.12.2021 04:49
Для растяжения пружины на 5 см необходимо приложить силу 2 h. какую работу нужно совершить, что бы растянуть эту же пружину на 30 см? ответ в джоулях...
sonua3
24.12.2021 04:49
Температура нагревателя идеальной тепловой машины t1=2270c, а холодильника t2=270c. количество теплоты, получаемой машиной от нагревателя, равно 120кдж. определить...
Takashu69
24.12.2021 04:49
Рассчитать эквивалентное сопротивление двух параллельно соединённых номиналами 15 ом и 20 ом....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// Внимание! Если программа не работает, обновите версию!
begin
var a:=Arr(-23,15,32,0,-56,87,7); a.Println;
Writeln('Кол-во элементов, больших нуля: ',a.Where(t->t>0).Count)
end.
Результат
-23 15 32 0 -56 87 7
Кол-во элементов, больших нуля: 4