Войти
Регистрация
Спроси ai-bota
kristpan2004p0c22v
17.04.2020 11:30
Имеется массив из 25 случайных чисел. получить новый массив из положительных значений первого, первый массив числа от -10 до +10
Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
HardFunny
10.08.2021 00:31
Задача Канаверал. Визначити поведінку космічного апарата, що стартує на екваторі, залежно від його початкової швидкості V. Як ви знаєте з уроків фізики, тут можливі...
givlinkovpaschozszti
03.11.2020 01:27
1. Оцените возможность продвижения стартапа и заполните таблицу продвижения стартапа достоинства недостатки...
agusin813
23.12.2021 04:21
Каковы условия применения вложенного условного оператора надооо...
0ForeverUnicorn0
13.11.2020 19:03
Паскаль. в двумерном массиве найти сумму элементов главной и побочной диагонали, элемент, находящийся в центре должен быть посчитан лишь один раз. нужно написать...
Sem5000
13.11.2020 19:03
Склавиатуры последовательно вводятся однозначные числа до тех пор пока не будет введено двухзначное число.найди сумму квадратов однозначных чисел (написать программу...
Sovergon233
13.11.2020 19:03
Вдиапазоне ячеек f12: c7 электронной таблицы содержится: а) 24 ячейки б) 32 ячейки в) 12 ячеек г) 14 ячеек...
Мейдей
13.11.2020 19:03
:ввести с клавиатуры массив из 5 элементов, найти в нем два максимальных элемента и их номера. pascal abc...
svetacok
13.11.2020 19:03
Перевести: число 91 из десятичной в двоичную число 1001110 из двоичной в десятичную число 17 десятичной в шестнадцатеричную из шестнадцатеричной в десятичную: в4...
NastikLoVe22
01.09.2022 07:07
Составить программу в paskal! 1) вычислите значение минимального элемента массива 2) вычислите сумму минисального и максимального элементов 3) выведите номер минимального...
EldarHolter
01.09.2022 07:07
Написать программу для нахождения суммы цифр двузначного числа(в pascal abc)...
Ответ:
sweetdog7
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 оценок)
Ответ:
подливка228
08.10.2020 03:38
Ничего сложного.
P.S. Работает на 11 стандарте и ниже, на счёт 14 и 17 не уверен.
UPD: Проверил на 14 и 17 стандарте, работает!
0,0
(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота