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

@Shilven · Регистрация: 12.11.2011

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

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

1) номер максимального элемента массива;
2) произведение элементов массива , расположенных между первым и вторым нулевым элементами.

преобразовать массив таким образом, чтобы в первой его половине располагались элименты , стоявшие в нечетных позициях , а во второй половине -элиементы , стоявшие в четных позициях .

P.S. народ числа вводятся рандомом , плз помогите

@Nikitos_$mile:) · 27.11.2011, 22:21

Pascal

var a:array[1..999999]of integer;
i,max,n,p,k:integer;
begin
 write('Количество элементов в массиве: ');
 readln(n);
 write('Исходный массив: ');
 for i:=1 to n do
               begin
               a[i]:=random(10);
               write(a[i],' ');
               end;
 max:=a[1];
 for i:=1 to n do             //поиск максимального элемента в массиве//
 if a[i]> max then
              begin
              max:=a[i];
              k:=i;
              end;
 write(max,' ',k);
 end.

@Shilven 0 / 0 / 0 Регистрация: 12.11.2011 Сообщений: 15
		1
	Найти произведение элементов массива, расположенных между первым и вторым нулевым элементами 27.11.2011, 19:23. Показов 1468. Ответов 1 Метки нет (Все метки) в одномерном массиве , состоящем из n целочисленных элементов вычислить: 1) номер максимального элемента массива; 2) произведение элементов массива , расположенных между первым и вторым нулевым элементами. преобразовать массив таким образом, чтобы в первой его половине располагались элименты , стоявшие в нечетных позициях , а во второй половине -элиементы , стоявшие в четных позициях . P.S. народ числа вводятся рандомом , плз помогите 0

	27.11.2011, 22:21

Опции темы

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

Решение