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

Массив. Найти сумму и количество элементов, предшествующих первому нулевому элементу.

26.11.2012, 09:50. Просмотров 1125. Ответов 1
Метки нет (Все метки)

Дан массив А(10).Найти сумму и количество элементов, предшествующих первому нулевому элементу.помогите пожалуйста!
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
26.11.2012, 09:50
Ответы с готовыми решениями:

Определить число элементов одномерного массива предшествующих его первому нулевому элементу
Составить процедуру для определения числа элементов одномерного массива предшествующих его первому...

Найти среднее арифметическое элементов массива, предшествующих первому нулевому элементу
Доброго времени суток, форумчане! Столкнулся с проблемой в коде программы, задание такое: Дан...

Найти произведение и среднее арифметическое элементов массива,предшествующих первому нулевому элементу
Дан массив вещественных чисел.Найти произведение и среднее арифметическое элементов...

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

1
Фрилансер
3411 / 2808 / 3000
Регистрация: 08.02.2012
Сообщений: 7,961
Записей в блоге: 1
26.11.2012, 10:15 2
Лучший ответ Сообщение было отмечено nurb как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Const n=10;
Var A:array[1..n] of integer;
    i,j,s:integer;
Begin
    j:=0;s:=0;
    For i:=1 to n do
    Begin
      write('A[',i,'] = ');
      readln(A[i]);
      if (A[i]=0)and(j=0) then j:=i;
      if j=0 then s:=s+A[i];
    End;
    writeln('Сумма элементов предшествующих первому нулевому = ',s);
    writeln('Кол-во элементов предшествующих первому нулевому = ',j-1);
    readln;
End.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
26.11.2012, 10:15

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

Подсчитать сумму и количество элементов по каждой строке, предшествующих первому отрицательному элементу
Даны два массива А и В. Подсчитать сумму и количество элементов по каждой строке, предшествующих...

Найти сумму элементов массива, предшествующих первому отрицательному элементу
Дан массив Х(n). Найти сумму элементов массива, предшествующих первому отрицательному элементу....

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

Найти сумму и количество положительных элементов массива, предшествующих первому нулевому элементу (C++ -> Python)
int A = {1,2,3,-4,0,6,7,8,9,10}; int sum = 0, count = 0; for (int i = 0; i < 10; ++i) ...

Подсчитать число элементов массива, предшествующих первому по порядку нулевому элементу
помогите сделать программу В массиве чисел D3 : D13 подсчитать число элементов, предшествующих...

Найти сумму элементов массива, предшествующих первому отрицательному элементу
Приветик ребят!!!)) Нужна ваша помощь.Не мего решить задачку на QBASIC, она реально неберущаяся...


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

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

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