Дан массив целых чисел, состоящий из 20 элементов, заполненный случайным образом числами из промежутка от –50 до 50. посчитать кол-во похожих элементов подсчитать сумму четных элементо
238
329
Ответы на вопрос:
var a: array[1..20] of integer; i,j,k,l,s: integer; beginfor i: =1 to 20 do beginrandomize; a[i]: =random(101)-50; write(a[i],' '); end; k: =0; l: =0; for i: =1 to 20 do beginif l< k then l: =k; k: =0; for j: =1 to 20 doif a[i]=a[j] then k: =k+1; end; writeln; writeln(l); for i: =1 to 20 doif i mod 2 = 0 then s: =s+a[i]; writeln(s); end.
выводит массив из рандомных 20 чисел между -50 и 50
допустим
0 1 -2 1 2 3 5 4 5 8 9 10 14 -14 8 -11 10 45 6 1
затем выводит макс. кол-во похожих
0 1 -2 1 2 3 5 4 5 8 9 10 14 -14 8 -11 10 45 6 1
3
и теперь сумму четных элементов
0 1 -2 1 2 3 5 4 5 8 9 10 14 -14 8 -11 10 45 6 1
1+1+3+4+8+10-14-11+45+1=48
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
rege1234508.04.2022 07:19
-
ammaa0905.08.2021 17:24
-
yana102804.04.2021 16:42
-
лиза263015.12.2021 11:03
-
pavlov020230.06.2021 22:22
-
КулБои27.04.2022 21:12
-
ропчан26.03.2022 21:05
-
аллалесниченко02.04.2022 18:12
-
serikovas8729.04.2021 05:03
-
BlazeySpace0102.02.2020 05:27
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.