Напишите программу в с++ : нужно вывести 10-ю степень полученного числа с тремя знаками в дробной части.
182
259
Ответы на вопрос:
Const n = 20; var a: array[1..n] of integer; i,j,k,m,li,ri,mi,s,x: integer; begin write('введите ключ поиска (0-49): '); read(x); { заполнить массив значениями } randomize; writeln('элементы массива'); for i : = 1 to n do begin a[i] : = random(50); write(a[i]: 3); end; writeln; { сортировка } for i : = 1 to n-1 do for j : = 1 to n-i do if a[j] > a[j+1] then begin s : = a[j]; a[j] : = a[j+1]; a[j+1] : = s end; writeln('отсортированный по возрастанию массив'); for i : = 1 to n do write(a[i]: 3); writeln; { бинарный поиск } li: =1; ri: =n; k: =0; while li< ri do begin mi: =(li+ri) div 2; if a[mi]< x then li: =mi+1 else ri: =mi; inc(k) end; if a[ri]=x then m: =ri else m: =0; { вывод результатов } if m> 0 then writeln('найден элемент № ',m,'; число шагов равно ',k) else writeln('такого элемента в массиве нет'); end. тестовое решение: введите ключ поиска (0-49): 25 элементы массива 33 47 1 28 31 36 15 25 49 35 30 48 24 0 39 35 7 20 25 0 отсортированный по возрастанию массив 0 0 1 7 15 20 24 25 25 28 30 31 33 35 35 36 39 47 48 49 найден элемент № 8; число шагов равно 4 вариант с процедурами const n = 20; type v=array[1..n] of integer; procedure sortbyselect(var a: v); {сортировка выбором} var i, j, k: integer; x: integer; begin for i : = 1 to n do begin k : = i; x : = a[i]; for j : = i+1 to n do if a[j]< x then begin k : = j; x : = a[j] end; a[k] : = a[i]; a[i] : = x end end; procedure binsearch(var a: v; key: integer; var k,m: integer); var li,ri,mi: integer; begin li: =1; ri: =n; k: =0; while li< ri do begin mi: =(li+ri) div 2; if a[mi]< key then li: =mi+1 else ri: =mi; inc(k) end; if a[ri]=key then m: =ri else m: =-1 end; var a: v; i,k,m,x: integer; begin write('введите ключ поиска (0-49): '); read(x); { заполнить массив значениями } randomize; writeln('элементы массива'); for i : = 1 to n do begin a[i] : = random(50); write(a[i]: 3); end; writeln; sortbyselect(a); { сортировка выбором } writeln('отсортированный по возрастанию массив'); for i : = 1 to n do write(a[i]: 3); writeln; binsearch(a,x,k,m); { бинарный поиск } if m> 0 then writeln('найден элемент № ',m,'; число шагов равно ',k) else writeln('такого элемента в массиве нет'); end. тестовое решение: введите ключ поиска (0-49): 32 элементы массива 46 24 32 32 23 32 4 26 47 4 44 8 39 8 15 39 11 45 5 16 отсортированный по возрастанию массив 4 4 5 8 8 11 15 16 23 24 26 32 32 32 39 39 44 45 46 47 найден элемент № 12; число шагов равно 5
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
KINDER12356726.01.2022 06:16
-
navaxa04.02.2021 07:30
-
педро22813.05.2021 20:58
-
dimitiy0230.09.2020 22:53
-
Luky4anovadasha07.01.2021 06:22
-
sakulich0524.06.2022 02:00
-
Veronika23462931.07.2022 20:14
-
Charafoxcoteyca3412.05.2020 14:32
-
vladbochilo06.10.2022 04:47
-
znaika75718.02.2020 15:22
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.