Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
Новичок301117
01.02.2021 04:49 •
Информатика
Массив а вводится с клавиатуры. сформировать новый массив в , состоящий из положительных элементов массива а. размер произвольный.
Показать ответ
Ответ:
Дашенька66778
03.10.2020 07:49
// PascalABC.NET 3.1, сборка 1172 от 19.02.2016
begin
var n:=ReadInteger('n=');
var a:=ReadArrInteger('->',n);
var b:=a.Select(x->x>0);
b.Println
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Skrilleax95
08.01.2021 19:35
VBA. В зависимости от номера месяца вывести: зима, лето, осень, весна сделайте программу....
ВероничкаКлубничка21
15.03.2020 05:24
Напишите программу, которая будет определять, является ли введенное слово идентификатором, на языке Python....
lol1039
24.02.2020 08:07
В некоторой игре одна из фигур слоник может ходить по диагонали, но только на одну клетку. Сколькими можно поставить трех слоников на поле 4x4 так, чтобы каждый из них...
Dirol3434
18.09.2020 00:36
Написать программу таким образом, чтобы: 1) массив состоял из 35 элементов вещественноготипа: 2) значения элементов массива должны меняться винтервале от -12 до 115: 3)...
sa66
01.01.2022 20:39
9. дан массив a(1..n), где n – нечётное чмсло. если средний элемент массива больше следующего за ним элемента, то среднему элементу присвоить значение 1, если они равны,...
bigrushnboss
17.04.2022 06:25
Сканируется цветное изображение размером 10,16×10,16 см.разрешающая сканера — 600×1200 dpi, глубина цвета — 16бита.какой информационный объём будет иметь полученный графический...
лол1628
26.01.2022 11:56
Айнымалы дегеніміз не по информатике...
digrigoreva61
19.02.2023 12:58
Найди закономерность и продолжи ряд чисел 3, 9,, 2, 8, 2, 7, 3, 8...
Nina1211065
19.02.2023 12:58
Сколько граммов сахара и воды нужно взять для приготовления 150г 10%-ного раствора сахара?...
IraIvan
19.02.2023 12:58
Вкаком объеме 10%-ного раствора сульфата железа (ii) (плотность 1,05г/мл) 0нужно растворить 27,8 г гептагидрата сульфата железа (ii), чтобы получить 15%-ный раствор?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
var n:=ReadInteger('n=');
var a:=ReadArrInteger('->',n);
var b:=a.Select(x->x>0);
b.Println
end.