8 / 8 / 2
Регистрация: 01.12.2009
Сообщений: 49
1

Найти сумму положительных элементов массива, расположенных до максимального элемента

14.01.2010, 22:31. Показов 2537. Ответов 2
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Обработка одномерных массивов.
Составить алгоритм и программу, которая в одномерном массиве, состоящем из n вещественных элементов, вычисляет:
а) Произведение отрицательных элементов массива.
б) Сумму положительных элементов массива, расположенных до максимального элемента.
в) Изменить порядок следования элементов в массиве на обратный.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
14.01.2010, 22:31
Ответы с готовыми решениями:

Вычислить сумму элементов массива, расположенных после максимального элемента
В одномерном массиве, состоящем из n вещественных элементов, вычислить: 1)количество элементов...

Массивы: Произведение положительных элементов, расположенных после максимального по модулю элемента
В одномерном массиве, состоящем из n вещественных элементов, определить: Произведение ...

Найти сумму и число положительных элементов одномерного массива, расположенных до первого 0
Дан одномерный массив А(10) нужно найти сумму и число положительных элементов стоящих до первого 0...

Найти сумму максимального элемента расположенных на четных индексах и минимального элемента на нечетных
Помогите,последняя задача от големов. Дан целочисленный массив размером N (одномерный)....

2
3310 / 1372 / 110
Регистрация: 28.04.2009
Сообщений: 4,822
15.01.2010, 05:10 2
а
программа+(блок-схема)
Вложения
Тип файла: rar Рабочий стол.rar (6.3 Кб, 114 просмотров)
0
3310 / 1372 / 110
Регистрация: 28.04.2009
Сообщений: 4,822
15.01.2010, 05:12 3
Лучший ответ Сообщение было отмечено MrDok как решение

Решение

в
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
uses crt;
const n=5;
var a:array[1..n] of integer;
    i,k:integer;
begin
clrscr;
for i:=1 to n do
   begin
     a[i]:=-10+random(20);
     write(a[i],' ');
   end;
writeln;
for i:=1 to n div 2 do
  begin
    k:=a[i];
    a[i]:=a[n+1-i];
    a[n+1-i]:=k;
 end;
 textcolor(lightgreen);
for i:=1 to n do
write(a[i],' ');
readln;
end.
схема
Вложения
Тип файла: rar сх.rar (6.7 Кб, 49 просмотров)
0
15.01.2010, 05:12
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
15.01.2010, 05:12
Помогаю со студенческими работами здесь

Найти сумму элементов массива расположеных до максимального элемента
В одномерном массиве состоящем из n вещественных элементов вычислить: сумму положительных элементов...

Найти сумму элементов массива, расположенных до последнего положительного элемента
В одномерном массиве, состоящем из n вещественных элементов, вычислить: Сумму элементов массива,...

Найти сумму элементов массива, расположенных после минимального элемента
Составить текст программы на языке Паскаль, содержащий: 1) функцию, выполняющую действия над...

Найти сумму положительных элементов, расположенных между максимальными и минимальными элементами массива
дан массив А(30). найти сумму и количество положительных элементов, расположенных между...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru