Дан массив целых чисел ,содержащий 15 элементов.вывести на экран индексы четных элементов массива .

224

388

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

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

MaryLoveB

Информатика

4,4(31 оценок)

Var mass: array[1..15] of integer; var i: integer ; begin randomize; for i: =1 to 15 do begin mass[i]: =random (46) - 25; write(mass[i],' '); end; writeln; for i: =1 to 15 do begin if (mass[i] mod 2 = 0) then writeln(i); end; end.

egorkrutou98

Информатика

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

Var n1, d1, n2, d2, m, n, d, nn, dd, nod: integer; r: double; begin writeln('нахождение суммы двух простых дробей.'); write('введите через пробел числитель и знаменатель первой дроби: '); readln(n1, d1); write('введите через пробел числитель и знаменатель второй дроби: '); readln(n2, d2); {находим результат, как простую дробь} n : = n1 * d2 + n2 * d1; d : = d1 * d2; r : = n / d; {если дробь неправильная, надо исключить целое число} if n > d then begin m : = n div d; n : = n mod d end else if n = d then begin m : = 1; n : = 0; d : = 1 end else m : = 0; {возможно числитель и знаменатель дроби могут быть частично сокращены} if n < > 0 then begin {ищем нод числителя и знаменателя и делим их на него} nn : = n; dd : = d; while nn < > dd do if nn > dd then nn : = nn - dd else dd : = dd - nn; nod : = nn; if nod < > 1 then begin n : = n div nod; d : = d div nod end; end; write(n1, '/', d1, ' + ', n2, '/', d2, ' = '); if m > 0 then if n < > 0 then writeln(m, ' ', n, '/', d, ' = ', r) else writeln(m) else writeln(n, '/', d, ' = ', r) end. тестовые примеры: нахождение суммы двух простых дробей. введите через пробел числитель и знаменатель первой дроби: 25 5 введите через пробел числитель и знаменатель второй дроби: 64 256 25/5 + 64/256 = 5 1/4 = 5.25 нахождение суммы двух простых дробей. введите через пробел числитель и знаменатель первой дроби: 8 19 введите через пробел числитель и знаменатель второй дроби: 154 221 8/19 + 154/221 = 1 495/4199 = 1.11788521076447 нахождение суммы двух простых дробей. введите через пробел числитель и знаменатель первой дроби: 5 7 введите через пробел числитель и знаменатель второй дроби: 12 42 5/7 + 12/42 = 1 нахождение суммы двух простых дробей. введите через пробел числитель и знаменатель первой дроби: 1 5 введите через пробел числитель и знаменатель второй дроби: 3 11 1/5 + 3/11 = 26/55 = 0.472727272727273

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

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

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

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

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

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

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

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

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

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