База ответов ИНТУИТ

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

<<- Назад к вопросам

Какую величину вычисляет программа?
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.    

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

Варианты ответа
количество положительных элементов массива
количество положительных элементов массива в последнем столбце(Верный ответ)
количество положительных элементов массива в каждой строке
количество положительных элементов массива в каждом столбце
количество положительных элементов массива в последней строке
Похожие вопросы
Какую величину вычисляет программа?
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]);      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]);      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.    
Какую величину вычисляет программа?
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 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,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,k : integer;begin      k := 1;      for i := 8 downto 1 do	  if a[i] = 0 then k := i;      write(k)end.    
Что будет выведено на экран в результате работы программы?
var a,b,c,d: integer;Procedure P( var a: integer; c: integer; var d: integer);var b: integer;begin   a:=5; c:=7; d:=9;end;begin   a:=1; b:=1; c:=1;   P(a,b,c);   write (a,'|',b,'|',c)end.    
Что будет выведено на экран в результате работы программы?
var a,b,c,d: integer;Procedure P( a: integer; var c: integer; var d: integer);var b: integer;begin   a:=5; c:=7; b:=9;end;begin   a:=1; c:=1; b:=1;   P(a,c,b);   write (a,'|',c,'|',b)end.    
Что будет выведено на экран в результате работы программы?
var a,b,c,d: integer;Procedure P( a: integer; var c: integer; var d: integer);var b: integer;begin   a:=5; c:=7; b:=9;end;begin   a:=1; b:=1; c:=1;   P(b,a,c);   write (a,'|',b,'|',c)end.