Составить программу одномерного массива. подсчитать количество чисел,не принадлежащих промежутку (х,у]
182
417
Ответы на вопрос:
Program program1; var arr: array[-100..100] of integer; arr2: array[-100..100] of integer; i, n, x, y: integer; begin randomize; write('введите количество элементов в массиве: '); readln(n); for i : = 1 to n do arr[i] : = random(100) - random(100); writeln('весь массив: '); for i : = 1 to n do write(arr[i], ' '); writeln(); write('введите x и y: '); read(x, y); for i : = 1 to x - 1 do write(arr[i], ' '); for i : = y + 1 to n do write(arr[i], ' '); end.
var
i,n,max,k: integer;
mas: array[1..100] of integer;
begin
randomize;
writeln('введите кол-во чисел');
readln(n);
for i: =1 to n do
mas[i]: =random(10)+1;
max: =mas[1];
for i: =2 to n do
if max< mas[i] then max: =mas[i];
for i: =1 to n do
write(mas[i], ' ');
for i: =1 to n do
if mas[i]=max then inc(k);
if ((k> 2) and (k< 5)) then write('в массиве ровно 3 максимальных числа')
else write('в массиве не 3 максимальных числа');
end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
tatka2234531.10.2022 17:50
-
НастяЛитвинюк08.08.2020 08:11
-
Darksholnic26.03.2023 14:15
-
Сиплел26.11.2020 20:57
-
polinna2006p06aeo30.12.2020 00:44
-
yubloh10.11.2020 17:45
-
aveter25627.05.2020 12:17
-
gera53525.06.2022 01:51
-
alicaraut23.05.2023 01:31
-
Regisha198128.09.2022 18:57
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.