Найти произведение количества отрицательных элементов и количество положительных элементов массива

@Noojer · Регистрация: 21.05.2013

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

Прошу помощи.
Задание:
Задан одномерный, целочисленный массив A(n), (n<=40).Найти произведение количества отрицательных элементов и кол-во положительных элементов массива. Затем упорядочить массив методом выбора. Вывести полученный массив и произведение.

@PE4@ · 24.05.2013, 14:55

Сортировка методом выбора сортировка
поиск произведения

Pascal

for i:=1 to n do
 begin
  if a[i]<0
   then
    kol1:=kol1+1
   else
    kol2:=kol2+1;
 end;
b:=kol1*kol2;
write(b);

где

Pascal

1 2	a:array[0..100] of integer; kol1,kol2,b,i:integer;

b - твое произведение

@Noojer 0 / 0 / 0 Регистрация: 21.05.2013 Сообщений: 3
		1
	Найти произведение количества отрицательных элементов и количество положительных элементов массива 24.05.2013, 14:12. Показов 3981. Ответов 1 Метки нет (Все метки) Прошу помощи. Задание: Задан одномерный, целочисленный массив A(n), (n<=40).Найти произведение количества отрицательных элементов и кол-во положительных элементов массива. Затем упорядочить массив методом выбора. Вывести полученный массив и произведение. 0

Опции темы

Найти произведение количества отрицательных элементов и количество положительных элементов массива

Решение