Вычислить сумму элементов массива, стоящих на четных местах и произведение элементов, стоящих на нечетных

@Dimondark · Регистрация: 19.07.2016

Студворк — интернет-сервис помощи студентам

в Массиве целых чисел что складывается из 20 элементов,узнать сумму элементов,что стоят на первых местах и произведение элементов,которые стоят на непарных местах.Полученный результат записать в текстовый файл!

дайте решение данной программы пожалуйста

@shilko2013 · 20.07.2016, 12:15

Первые места и непарные места понятия растяжимые...

@Cyborg Drone · 20.07.2016, 14:31

Dimondark, неверный перевод с украинского языка, так? Первые = чётные, непарные = нечётные.

Не указано, как массив попадает в программу. Логично предположить, что, если результаты выводятся в текстовый файл, то и массив вводится из текстового файла.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
const m = 20;
var n: integer;
    p, s: extended;
    a: array [1..m] of integer;
    f: text;
begin
  assign(f, 'input.txt');
  reset(f);
  s := 0;
  p := 1;
  for n := 1 to m do
    begin
      read(f, a[n]);
      if odd(n)
        then p := p * a[n]
        else s := s + a[n]
    end;
  close(f);
  assign(f, 'output.txt');
  rewrite(f);
  writeln(f, 'Produst of elements with odd indexes = ', p:0:0);
  writeln(f, 'Sum of elements with even indexes = ', s:0:0);
  close(f)
end.

Текстовый файл input.txt, содержащий 20 целочисленных элементов массива, записанных через пробел, возможно, в несколько строк. Для исключения целочисленного переполнения, а также для исключения использования длинной арифметики, сумма и произведение аккумулируются в переменных стандартного типа с наибольшим количеством значащих разрядов. В программе нет проверок на неверное количество и неверный тип элементов. Так как в задании декларировано применение массива, данные из файла копируются в массив. Вообще говоря, массив для данной программы не требуется, вместо массива целых чисел можно использовать одну простую целочисленную переменную.

Новые блоги и статьи Все статьи Все блоги /
моя боль iceja 24.01.2026 Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .	Модель сукцессии микоризы anaschu 24.01.2026 Решили писать научную статью с неким РОманом	http://iceja.net/ математические сервисы iceja 20.01.2026 Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .	http://iceja.net/ сервер решения полиномов iceja 18.01.2026 Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .	Восстановить юзерскрипты Greasemonkey из бэкапа браузера damix 15.01.2026 Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .	Сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/	WordPad для Windows 11 Jel 10.01.2026 WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .

@Dimondark 0 / 0 / 0 Регистрация: 19.07.2016 Сообщений: 14

	Вычислить сумму элементов массива, стоящих на четных местах и произведение элементов, стоящих на нечетных 20.07.2016, 12:09. Показов 5020. Ответов 2 Метки нет (Все метки) в Массиве целых чисел что складывается из 20 элементов,узнать сумму элементов,что стоят на первых местах и произведение элементов,которые стоят на непарных местах.Полученный результат записать в текстовый файл! дайте решение данной программы пожалуйста 0

@shilko2013 257 / 234 / 185 Регистрация: 02.04.2016 Сообщений: 898
	20.07.2016, 12:15
	Первые места и непарные места понятия растяжимые... 0

Опции темы

Вычислить сумму элементов массива, стоящих на четных местах и произведение элементов, стоящих на нечетных

Решение