Заполнение целочисленного массива из 5 элементов (одномерного)

275

419

Посмотреть ответы 2

Ответы на вопрос:

Yoidzokumi

Информатика

4,7(12 оценок)

Var a: array [1..5] of integer; i: byte; begin for i : = 1 to 5 do readln(a[i]); end.

11Катя11111

Информатика

4,5(2 оценок)

1.1. количество нечетных чисел в заданном промежутке можно легко найти, зная что нечетные числа следуют через одно, чередуясь с четными. конечно, можно написать в программе цикл и перебрать все нечетные элементы, каждый раз добавляя по +1 в счетчик количества, но гораздо проще воспользоваться знаниями из . легко видеть, что нечетные числа образуют арифметическую прогрессию с разностью d=-2, начальный член a1=7, а конечный член an=-3. вспомним формулу для n-го члена арифметической прогрессии и получим из нее n. в соответствии с условиями нашей это будет верно, если a1 и an - нечетные. если a1 четное, то его надо уменьшить на 1. аналогично, если an четное, его надо увеличить на 1. таким образом, мы получаем алгоритм, пригодный для быстрого определения количества нечетных чисел на любом интервале с целочисленными границами. ниже приводится соответствующая программа. program p11; var a,b,n: integer; begin write('введите границы интервала: '); readln(a,b); { защита от неверного порядка ввода } if a< b then begin n: =a; a: =b; b: =n end; { если надо, корректируем границы на нечет } if (a mod 2)=0 then a: =a-1; if (b mod 2)=0 then b: =b+1; { сам расчет } n: =(a-b) div 2 + 1; writeln('количество нечетных чисел на интервале равно ',n) end. тестовое решение: введите границы интервала: -3 7 количество нечетных чисел на интервале равно 6 1.2 в противоположность предложенному решению, где сначала надо было думать, можно использовать "метод грубой силы" (программисты называют его "брутфорс" - от bruteforce), т.е. программировать ни о чем не думая. ниже - пример такого решения. оно более короткое, но при больших интервалах время решения окажется на несколько порядков больше. program p12; var a,b,i,k: integer; begin write('введите границы интервала: '); readln(a,b); { защита от неверного порядка ввода } if a< b then begin k: =a; a: =b; b: =k end; k: =0; for i: =a downto b do if (i mod 2)< > 0 then k: =k+1; writeln('количество нечетных чисел на интервале равно ',k) end. тестовое решение: введите границы интервала: -3 7 количество нечетных чисел на интервале равно 6 2.1. тут на первый взгляд стандартная и вроде бы думать нечего - в цикле накапливаем сумму: program p21; var i: integer; x,s: real; begin write('введите значение x: '); readln(x); s: =0; i: =2; while i< =20 do begin s: =s+i*x; i: =i+2 end; writeln('cумма членов последовательности равна ',s) end. тестовое решение: введите значение x: 2.15 cумма членов последовательности равна 236.5 2.2. но и тут есть место для размышлений. опять вспоминаем . но полученная сумма - это сумма арифметической прогрессии с начальным членом, равным единице, конечным членом, равным 10 и разностью 1. формула такой суммы известна и мы продолжаем преобразования. теперь можно и программу написать. program p22; var x: real; begin write('введите значение x: '); readln(x); writeln('cумма членов последовательности равна ',110*x) end. тестовое решение: введите значение x: 2.15 cумма членов последовательности равна 236.5 пары решений призваны показать, что первое пришедшее в голову решение обычно всегда не лучшее. а еще - что для качественного программирования надо учить .

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.