Ответы на вопрос:
ответ: Для примера возьмем число 503. Если бы это число было записано в непозиционной системе, то его значение равнялось 5+0+3 = 8. Но у нас — позиционная система и значит каждую цифру числа необходимо умножить на основание системы, в данном случае число “10”, возведенное в степень, равную номеру разряда
Program ex1; const n = 10; var a: array[1..n] of integer; kodd, e, i: integer; begin randomize; kodd : = 0; write('исходный массив '); for i : = 1 to n do begin e : = random(20) + 1; a[i] : = e; if (e mod 2) < > 0 then kodd : = kodd + 1; write(e: 3) end; writeln; writeln('количество нечетных элементов - ', kodd) end. тестовое решение: исходный массив 9 2 1 18 17 16 11 15 15 13 количество нечетных элементов - 7 program ex2; const n = 10; var a: array[1..n] of integer; kneg, e, i: integer; begin randomize; kneg : = 0; write('исходный массив '); for i : = 1 to n do begin e : = random(21) - 10; a[i] : = e; if e < 0 then kneg : = kneg + 1; write(e: 4) end; writeln; writeln('количество отрицательных элементов - ', kneg); end. тестовое решение: исходный массив -9 -1 -7 -4 8 -4 1 -1 -7 0 количество отрицательных элементов - 7 program ex3; const n = 10; var a: array[1..n] of integer; e, i: integer; begin randomize; write('исходный массив '); for i : = 1 to n do begin a[i] : = random(20); write(a[i]: 4) end; writeln; write('результирующий массив '); for i : = 1 to n do begin if a[i] mod 2 = 0 then a[i] : = 1; write(a[i]: 4) end; writeln; end. тестовое решение: исходный массив 3 16 4 1 13 0 14 14 10 18 результирующий массив 3 1 1 1 13 1 1 1 1 1 program ex4; const n = 10; var a: array[1..n] of integer; e, i: integer; begin randomize; write('исходный массив '); for i : = 1 to n do begin a[i] : = random(11) + -5; write(a[i]: 4) end; writeln; write('результирующий массив '); for i : = 1 to n do begin if a[i] = 0 then a[i] : = 1; write(a[i]: 4) end; writeln; end. тестовое решение: исходный массив 4 -5 0 -2 -4 -5 -2 0 -1 -5 результирующий массив 4 -5 1 -2 -4 -5 -2 1 -1 -5 program ex5; const n = 10; var a: array[1..n] of integer; e, i: integer; begin randomize; write('исходный массив '); for i : = 1 to n do begin a[i] : = random(10) + 1; write(a[i]: 3) end; writeln; write('результирующий массив '); for i : = 1 to n do begin if a[i] = 3 then a[i] : = 5; write(a[i]: 3) end; writeln; end. тестовое решение: исходный массив 8 9 6 10 10 7 1 3 1 3 результирующий массив 8 9 6 10 10 7 1 5 1 5
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
reki4529.11.2021 22:18
-
muratov2001107.09.2022 05:01
-
lty22005102.04.2021 20:27
-
julealeo27.02.2023 12:12
-
Bogdasha30060t16.08.2022 12:41
-
gizatulina1701tata23.10.2020 22:13
-
dominika629.06.2020 14:41
-
vikimeis200621.02.2022 08:21
-
МикаэльБостон10.04.2020 09:31
-
chmy199804.12.2022 14:15
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.