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

@Alenkafm · Регистрация: 27.09.2019

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

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

@JuriiMW · 02.12.2019, 04:19

Pascal

begin
  var a:=ArrRandomReal(10,-10,10);
  a.Println;
  a.Where(x->x>0).Average.Println;
  a.Where(x->x<0).Product.Println;
  a.Where(x->x<0).Count.Println;
end.

@Alenkafm · 02.12.2019, 18:08 **[ТС]**

мне не в паскале нужно(

@ZX Spectrum-128 · 02.12.2019, 18:20

Сообщение от Alenkafm

не в паскале

А в чем?

@Alenkafm · 02.12.2019, 19:49 **[ТС]**

с++

@Alenkafm 0 / 0 / 0 Регистрация: 27.09.2019 Сообщений: 25
		1
	В массиве найти среднее арифметическое положительных элементов, произведение и количество отрицательных элементов 01.12.2019, 22:27. Показов 1919. Ответов 4 Метки нет (Все метки) в массиве найти среднее арифметическое положительных элементов массива, произведение и количество отрицательных элементов 0

@Alenkafm 0 / 0 / 0 Регистрация: 27.09.2019 Сообщений: 25
	02.12.2019, 18:08 [ТС]	3
	мне не в паскале нужно( 0

@ZX Spectrum-128 6809 / 4566 / 4819 Регистрация: 05.06.2014 Сообщений: 22,438
	02.12.2019, 18:20	4
	Сообщение от Alenkafm не в паскале А в чем? 0

@Alenkafm 0 / 0 / 0 Регистрация: 27.09.2019 Сообщений: 25
	02.12.2019, 19:49 [ТС]	5
	с++ 0

Опции темы