Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/6: Рейтинг темы: голосов - 6, средняя оценка - 5.00
1 / 1 / 1
Регистрация: 25.11.2011
Сообщений: 30
1

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

06.12.2011, 11:45. Просмотров 1067. Ответов 1
Метки нет (Все метки)

В одномерном массиве, состоящем из n целочисленных элементов.вычислить:

1)Сумму элементов массива, расположенных между первым и последним нулевыми элементами

Преобразовать массив таким образом, чтобы сначала располагались все положительные элементы, а потом - все отрицательные ( элементы, равные нулю, считать положительными).
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
06.12.2011, 11:45
Ответы с готовыми решениями:

Вычислить сумму элементов массива, расположенных между первым и последним нулевыми элементами
Как вычислить сумму элементов массива, расположенных между первым и последним нулевыми элементами....

Сумму элементов массива, расположенных между первым и последним нулевыми элементами.
1)Сумму элементов массива, расположенных между первым и последним нулевыми элементами. С меня...

В одномерном числовом массиве размерности n вычислить сумму элементов, расположенных между первым и последним нулевыми элементами
2. В одномерном числовом массиве размерности n вычислить сумму элементов, расположенных между...

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

1
trainspotting
1083 / 483 / 384
Регистрация: 11.11.2010
Сообщений: 773
06.12.2011, 12:11 2
Лучший ответ Сообщение было отмечено Emelya14 как решение

Решение

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
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
const
  n=15;
type
  arr=array[1..n] of integer;
var
  a:arr;
  i,j,buf,s,f_zero,l_zero:integer;
begin
  randomize;
  writeln('Ishodniy massiv:');
  for i:=1 to n do
    begin
      a[i]:=-5+random(11);
      write(a[i]:4);
    end;
  writeln;
  {poisk pervogo nulevogo el.}
  i:=1;
  while (a[i]<0) or (a[i]>0) and (i<=n) do
    inc(i);
  if i>n then
    writeln('V massive net nulevyh elementov')
  else
    begin
      f_zero:=i;{indeks pervogo nulevogo el.}
      {poisk poslednego nulevogo el.}
      l_zero:=0;
      for i:=f_zero+1 to n do
        if a[i]=0 then
          l_zero:=i;
      if l_zero=0 then
        writeln('V massive tolko odin nulevoi element')
      else if f_zero+1=l_zero then
        writeln('Mezhdu 1 i 2 nulevym net elementov')
      else
        begin
          s:=0;
          for i:=f_zero+1 to l_zero-1 do
            s:=s+a[i];
          writeln('Summa mezhdu pervym i posl. nulevym el.:',s);
        end;
    end;
  {preobrazovanie massiva polozh i nuli v nachale, otritsatelnye v kontse}
  i:=1;j:=n;
  while i<j do
    if a[i]>=0 then
      inc(i)
    else if a[j]>=0 then
      begin
        buf:=a[j];
        a[j]:=a[i];
        a[i]:=buf;
        inc(i);dec(j);
      end
    else
      dec(j);
  writeln('Massiv posle preobrazovaniya:');
  for i:=1 to n do
    write(a[i]:4);
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
06.12.2011, 12:11

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

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

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

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

Найти сумму элементов массива, расположенных между первым и последним нулевым элементами
Кто может улучшить или как-то оптимизировать...:::??? Найти сумму элементов массива, расположенных...

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

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


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.