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

Найти номер макс. элемента масива и произведение элементов масива между 1-м и 2-м нулевыми элементами

29.05.2014, 21:52. Просмотров 1000. Ответов 1
Метки нет (Все метки)


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

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

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

Найти произведение элементов массива, расположенных между первым и вторым нулевыми элементами
Помогите пожалуйста, до завтра надо сдать 5 лабораторок, 3 я сделал, но вот эти две вообще без...

Найти произведение элементов масива, принадлежащих промежутку [-2,2].
Дан одномерный массив. X (...) {не суть важно} Найти: 1. Произведение элементов, принадлежащих...

1
32 / 37 / 47
Регистрация: 14.10.2013
Сообщений: 108
30.05.2014, 01:41 2
Лучший ответ Сообщение было отмечено Rusak как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
var
   a:array[1..100] of integer;
   n,i,max,imax,j,pro,pro2:integer;
begin
max:=0;  pro:=1;
write('Ââåäèòå êîëè÷åñòâî çíà÷åíèé. n = ');
               readln(n);
for i:=1 to n do begin
write('a[',i,'] = ');
                readln(a[i]);
if a[i]>max then begin
max:=a[i];
 imax:=i;
 end;
if a[i]=0 then j:=j+1;
if (j<2) and (j>0) and (a[i]<>0) then pro:=pro*a[i];
end;
writeln('Ìàêñ ýëåìåíò a[',imax,'] = ',max);
writeln('Ïðîèçâåäåíèå ìåæäó ïåðâûìè äâóìÿ íóëÿìè = ',pro);
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
30.05.2014, 01:41

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

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

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

Найти сумму и количество элементов между первым и последним нулевыми элементами массива
Дан массив А.Найти сумму и количество элементов между первым и последним нулевыми элементами.

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


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

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

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