В массиве Y(n) найти среднее арифметическое положительных элементов, имеющих четные номера

@DAVID594 · Регистрация: 03.12.2018

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

В массиве Y(n) найти среднее арифметическое положительных элементов, имеющих четные номера

прога в паскале через двумерный массив

@bormant · 09.12.2018, 15:42

Pascal

  i:=2;
  while i<=n do begin
    if y[i]>0 then begin
      s:=s+y[i]; Inc(k);
    end;
    Inc(i,2);
  end;
  if k>0 then WriteLn(s/k)
  else WriteLn('искомые элементы отсутствуют');

@DAVID594 0 / 0 / 0 Регистрация: 03.12.2018 Сообщений: 19
		1
	В массиве Y(n) найти среднее арифметическое положительных элементов, имеющих четные номера 09.12.2018, 14:33. Показов 1526. Ответов 1 Метки нет (Все метки) В массиве Y(n) найти среднее арифметическое положительных элементов, имеющих четные номера прога в паскале через двумерный массив 0

	09.12.2018, 15:42