Войти
Регистрация
Спроси ai-bota
Сашалажа
23.09.2020 15:14
Программа на паскаль найти количество элементов массива целых чисел c(14), больших куба второго элемента массива этого массива. если таких элементов нет выдать сообщение- поиск неудачен
Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
skubelinavika
11.10.2021 12:52
Квадратное уравнение в abc pascal готовое нужно ! заранее о ) ; * задали а я все проболел...
ПАПА1111111111
25.07.2021 14:02
Есть программа: winners = 0 for ticket in 345, 19, 87, 1020, 421: if ticket % 5 == 0: print(ticket, - Повезло ) Надо сделать так, чтобы при её выводе в консоль выводились только...
rim2891
23.09.2022 13:30
Подготовь информацию о казахских орнаментах с интернета. Составь текст из 5 предложений. Напиши название орнамента. Где используют этот орнамент?...
devyticlassnicadf17
15.05.2020 11:56
Хелп эта таблица как пример ( нужно сделать код и чтобы вывелось на экран такая) таблица ...
Masha12fg
01.12.2022 15:03
)написать программу которая вычисляет целую часть и остаток от деления целого числа на 2...
zofiaoxd1zb
29.07.2021 19:25
Известно, что Х - натуральное число из интервала от 15 до 46 включительно. Имеются два высказывания о числе Х: A = {первая цифра X - нечётная} B = {X делится на 5} Какое из перечисленных...
MASTER2008
11.09.2021 04:34
ВСЕГО 3 ВО Геродот қазақтың қолөнері туралы не жазған?2.Заттар неден жасалған? 3. Қазақтың тіккен аяқкиімдері қандай болған?...
zaharsteam
27.11.2021 17:13
Запишите алгоритмическую конструкцию цикла с предусловием...
юстина6
27.11.2021 17:13
С чем связано возникновение романського стилю...
Elina558548
20.02.2023 17:48
Если Сосновый шар плавающий на поверхности воды положить масла плотностью 900 кг метров в кубе то что произойдет с силой Архимеда ответ с доказательством...
Ответ:
Блейк51
07.10.2020 17:58
//PascalABC.NET 3.3,сборка 1611 от 06.01.2018
//Внимание! Если программа не работает, обновите версию!
begin
var mas:=ArrRandom(14,-99,99); mas.Println;
var a:=mas[1]**3; var b:=mas.Where(t-> t> a).Count;
if b=0 then Writeln('поиск неудачен') else
Writeln('Таких элементов ->',b);
end.
0,0
(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота