N | Фрагмент программы | Задания |
1 | program P1; const N=2; M=4; var A:array [1..N,1..M] of integer; i, j: integer; begin randomize; for i:=1 to N do begin for j:=1 to M do begin A [i, j]:=random(100); write (A[i,j]:4); end; writeln; end; … end. | Что можно сказать о сформированном массиве? |
2 | for i:=1 to N do for j:=1 to M do A [i,j]:=3*j+i; | Чему равен элемент A [4,2]? |
3 | for i:=1 to 3 do for j:=1 to 4 do A [i,j]:=2*i; | Выписать сформированную матрицу |
4 | for i:=1 to N do for j:=1 to M do A [i,j]:=20+A [i,j]; | Что выполняет фрагмент программы? |
5 | x:=0; for i:=1 to N do for j:=1 to M do if A [i,j] writeln (‘x=’ , x); | Что находит фрагмент программы? |
6 | z:=0; for i:=1 to N do for j:=1 to M do if A [i,j]10 then z:= z+1; writeln (‘z=’ , z); | Что находит фрагмент программы? |
7 | for i:=1 To N Do write (A [i,2]:3 ); | Что выполняет фрагмент программы? |
8 | 5 | 5 | 4 | 5 | 7 | 2 | 8 | 4 | 6 | 3 | 4 | 8 | 1 | 2 | 2 | 5 | 3 | 9 | 4 | 8 | 2 | 9 | 1 | 3 | 3 | z:=0; for j:=1 To 5 Do if A [4,j] writeln (z); | Выполнить фрагмент программы для предложенной матрицы. Найти z. |
9 | 5 | 5 | 4 | 5 | 7 | 2 | 8 | 4 | 6 | 3 | 4 | 8 | 1 | 2 | 2 | 5 | 3 | 9 | 4 | 8 | 2 | 9 | 1 | 3 | 3 | z:=0; for j:=1 To 5 Do if A [2,j] mod 3=0 then z:=z+1; writeln (z); | Выполнить фрагмент программы для предложенной матрицы. Найти z. |
10 | 5 | 5 | 4 | 5 | 7 | 2 | 8 | 4 | 6 | 3 | 4 | 8 | 1 | 2 | 2 | 5 | 3 | 9 | 4 | 8 | 2 | 9 | 1 | 3 | 3 | z:=0; for i:=1 To 5 Do if A [i,3]4 then z:=z+A [i,3]; writeln (z); | Выполнить фрагмент программы для предложенной матрицы. Найти z. |
11 | 5 | 5 | 4 | 5 | 7 | 2 | 8 | 4 | 6 | 3 | 4 | 8 | 1 | 2 | 2 | 5 | 3 | 9 | 4 | 8 | 2 | 9 | 1 | 3 | 3 | for i:=1 to 5 do begin D [i]:=0; for j:=1 to 5 do if a[i,j] mod 2=0 then D [i]:=D [i]+1; end; for i:=1 to 5 writeln (D [i]); end. | Выполнить фрагмент программы для предложенной матрицы. Распечатать (выписать) массив D. |
N | Фрагмент программы | Задания | Ответы |
1 | program P1; const N=2; M=4; var A:array [1..N,1..M] of integer; i, j: integer; begin randomize; for i:=1 to N do begin for j:=1 to M do begin A [i, j]:=random(100); write (A[i,j]:4); end; writeln; end; … end. | Что можно сказать о сформированном массиве? | 5 6 89 45 2 7 12 23 |
2 | for i:=1 to N do for j:=1 to M do A [i,j]:=3*j+i; | Чему равен элемент A [4,2]? | 10 |
3 | for i:=1 to 3 do for j:=1 to 4 do A [i,j]:=2*i; | Выписать сформированную матрицу | 2 2 2 2 4 4 4 4 6 6 6 6 |
4 | for i:=1 to N do for j:=1 to M do A [i,j]:=20+A [i,j]; | Что выполняет фрагмент программы? | Увеличивает все элементы матрицы на 20 |
5 | x:=0; for i:=1 to N do for j:=1 to M do if A [i,j] writeln (‘x=’ , x); | Что находит фрагмент программы? | Во всей матрице сумму элементов, меньших 25 |
6 | z:=0; for i:=1 to N do for j:=1 to M do if A [i,j]10 then z:= z+1; writeln (‘z=’ , z); | Что находит фрагмент программы? | Во всей матрице количество элементов, больших 10 |
7 | for i:=1 To N Do writeln (A [i,2]); | Что выполняет фрагмент программы? | Распечатывает элементы 2 столбца |
8 | 5 | 5 | 4 | 5 | 7 | 2 | 8 | 4 | 6 | 3 | 4 | 8 | 1 | 2 | 2 | 5 | 3 | 9 | 4 | 8 | 2 | 9 | 1 | 3 | 3 | z:=0; for j:=1 To 5 Do if A [4,j] writeln (z); | Выполнить фрагмент программы для предложенной матрицы. Найти z. | 12 |
9 | 5 | 5 | 4 | 5 | 7 | 2 | 8 | 4 | 6 | 3 | 4 | 8 | 1 | 2 | 2 | 5 | 3 | 9 | 4 | 8 | 2 | 9 | 1 | 3 | 3 | z:=0; for j:=1 To 5 Do if A [2,j] mod 3=0 then z:=z+1; writeln (z); | Выполнить фрагмент программы для предложенной матрицы. Найти z. | 2 |
10 | 5 | 5 | 4 | 5 | 7 | 2 | 8 | 4 | 6 | 3 | 4 | 8 | 1 | 2 | 2 | 5 | 3 | 9 | 4 | 8 | 2 | 9 | 1 | 3 | 3 | z:=0; for i:=1 To 5 Do if A [i,3]4 then z:=z+A [i,3]; writeln (z); | Выполнить фрагмент программы для предложенной матрицы. Найти z. | 11 |
11 | 5 | 5 | 4 | 5 | 7 | 2 | 8 | 4 | 6 | 3 | 4 | 8 | 1 | 2 | 2 | 5 | 3 | 9 | 4 | 8 | 2 | 9 | 1 | 3 | 3 | for i:=1 to 5 do begin D [i]:=0; for j:=1 to 5 do if a[i,j] mod 2=0 then D [i]:=D [i]+1; end; for i:=1 to 5 writeln (D [i]); end. | Выполнить фрагмент программы для предложенной матрицы. Распечатать массив D. | 1 4 4 2 1 |