Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Alex90111
22.12.2020 18:54 •
Информатика
Имеется массив из 25 случайных чисел. получить новый массив из положительных значений первого, первый массив числа от -10 до +10
Ответ:
evelenbar
08.10.2020 03:38
// PascalABC.NET 3.3, сборка 1634 от 14.02.2018
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(25,-10,10); a.Println;
a:=a.Where(t->t>0).ToArray; a.Println
end.
0,0
(0 оценок)
Ответ:
solodovnikovay124
08.10.2020 03:38
Ничего сложного.
P.S. Работает на 11 стандарте и ниже, на счёт 14 и 17 не уверен.
UPD: Проверил на 14 и 17 стандарте, работает!
0,0
(0 оценок)
Популярные вопросы: Информатика
ocnovavladimir
26.10.2021 23:58
Решить информатику: 1) для кодирования некоторой последовательности, состоящей из букв а, б, в, г, д, е, ж решили использовать неравномерный двоичный код, удовлетворяющий...
зарема89
11.06.2021 20:19
Учительница в начальной школе дала следующую : «у вики и тамары вместе а конфет. причём у вики на b конфет больше, чем у тамары. определите сколько конфет у тамары»....
tipikina2016
14.08.2021 16:46
Вклассе 0 во 2 девочек и 1100 во 2 мальчиков. сколько учеников в классе? ...
mikc2
22.09.2022 15:42
Нужно составить программу в pascal abc...
melongemma
28.05.2023 16:47
Вычислить сумму квадратов чисел, принадлежащих промежутку (a,b), стоящих на местах, кратных 4; подсчитать кол-во во всем массиве.pascal...
Over003
05.02.2023 10:23
Запишите алгоритм вычисление суммы 1+2+3+…+n....
artemmenshikov2715
10.07.2022 08:09
Определить количество положительных чисел из 2 чисел, вводимых с клавиатуры...
ьтььбть
20.11.2020 14:51
Как изменить характеристики абзаца?...
Masha45322
14.08.2020 02:58
Pascal. вычислить объем цилиндра, вписанного в правильную шестиугольную призму, у которой каждое ребро равно a....
Dasha9716
02.01.2021 18:35
Pascal после очередного этапа чемпионата мира по кольцевым автогонкам на автомобилях с открытыми колесами формула-а гонщики собрались вместе в кафе, чтобы обсудить...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(25,-10,10); a.Println;
a:=a.Where(t->t>0).ToArray; a.Println
end.
P.S. Работает на 11 стандарте и ниже, на счёт 14 и 17 не уверен.
UPD: Проверил на 14 и 17 стандарте, работает!