Какую величину вычисляет программа? const ...

Программирование на языке высокого уровня Паскаль

Какую величину вычисляет программа?

const   a : array[1..8] of integer = (3,8,0,-6,0,-1,-9,3);var   i,k : integer;begin      k := 0;      for i := 1 to 8 do	  if a[i] < 0 then k := k + i;      write(k)end.

(Отметьте один правильный вариант ответа.)

Варианты ответа

количество отрицательных элементов массива

сумму отрицательных элементов массива

количество номеров отрицательных элементов массива

сумму номеров отрицательных элементов массива(Верный ответ)

Похожие вопросы

Какую величину вычисляет программа?

const     a : array[1..8] of integer = (3,8,0,-6,0,-1,-9,3);var   i,j,k : integer;begin      k := 0; j := 4;      for i := 1 to 8 do	  if abs(a[i]) >j then k := a[i];      write(k)end.

Какую величину вычисляет программа?

const     a : array[1..8] of integer = (3,8,0,-6,0,-1,-9,3);var   i,j,k : integer;begin      k := 0; j := 4;      for i := 1 to 8 do	  if a[i] >j then k := abs(a[i]);      write(k)end.

Какую величину вычисляет программа?

const   a : array[1..8] of integer = (3,8,0,-6,0,-1,-9,3);var   i,k : integer;begin      k := 1;      for i := 8 downto 1 do	  if a[i] = 0 then k := i;      write(k)end.

Какую величину вычисляет программа?

var   a : array[1..3,1..4] of integer;var   i,j,k : integer;begin      for i := 1 to 3 do 	 for j := 1 to 4 do read(a[i,j]);      k:=0;      for j := 1 to 4 do         for i := 1 to 3 do            if a[i,j]=0 then k:=j      write(k)end.

Какую величину вычисляет программа?

var   a : array[1..3,1..4] of integer;var   i,j,k : integer;begin      for i := 1 to 3 do 	 for j := 1 to 4 do read(a[i,j]);      k:=0;      for i := 1 to 4 do         for j := 1 to 3 do            if a[j,i]=0 then k:=i      end;      write(k)end.

Какую величину вычисляет программа?

var   a : array[1..3,1..4] of integer;var   i,j,k : integer;begin      for i := 1 to 3 do 	 for j := 1 to 4 do read(a[i,j]);      for i := 1 to 3 do begin         k := 0;         for j := 1 to 4 do	  if a[i,j] >0 then inc(k);      end;      write(k)end.

Какую величину вычисляет программа?

var   a : array[1..3,1..4] of integer;var   i,j,k : integer;begin      for i := 1 to 3 do 	 for j := 1 to 4 do read(a[i,j]);      for i := 1 to 4 do begin         k := 0;         for j := 1 to 3 do	  if a[j,i] >0 then inc(k);      end;      write(k)end.

Какое число получится в результате работы программы?

const   a : array[1..8] of integer = (3,8,0,-6,0,-1,-9,3);var   i,k : integer;begin      k := a[1];      for i := 2 to 8 do	  if a[i] >k then k := a[i];      write(k)end.

Какое число получится в результате работы программы?

const     a : array[1..8] of integer = (3,8,0,-6,0,-1,-9,3);var   i,j,k : integer;begin      k := 0; j := 2;      for i := 1 to 8 do	  if a[i] < j then inc(k);      write(k)end.

Какое число получится в результате работы программы?

const   a : array[1..8] of integer = (3,8,0,-6,0,-1,-9,3);var   i,k : integer;begin      k := abs(a[8]);      for i := 1 to 8 do	  if abs(a[i]) >k then k := abs(a[i]);      write(k)end.