Арус массив numbers[1..50] заполнен случайными числами в пределах от 1 до 100.определить сколько элементов массива отличаются от последнего элемент
184
499
Ответы на вопрос:
Const n = 50; var numbers: array [1..50] of integer; i, k: integer; begin k : = 0; for i: =1 to n do numbers[i] : = random(100); for i: =1 to n do if numbers[i] < > numbers[n] then inc(k); write(k); end.
/pascalabc.net 3.2, сборка 1385 от 14.02.2017 // внимание! если программа не работает, обновите версию! begin writeln('поквартирная численность жильцов'); var a: =arrrandom(36,1,10); a.println; var mx: =a.max; write('квартиры с максимальным количеством жильцов: '); a.select((x,i)-> (x,(x-> x[0]=mx).select(x-> x[1]+1).println end. пример поквартирная численность жильцов 7 9 6 7 8 9 1 4 7 8 8 8 1 7 7 8 3 10 7 7 2 9 7 3 2 8 2 2 10 4 4 5 2 1 7 1 квартиры с максимальным количеством жильцов: 18 29
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
194526924.07.2022 04:24
-
almaz200814.03.2022 21:12
-
artenyancz10.03.2020 11:03
-
HKTOG22.08.2022 15:38
-
Нм6шиш09.12.2020 15:22
-
alinabiychinska15.02.2022 01:00
-
sasha32232225.03.2022 21:36
-
ldontknow113.09.2020 14:38
-
myshkin0229.03.2021 12:25
-
Mad1nka14.08.2022 01:00
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.