Значение элементов двумерного целочисленного массива В, оба индекса которого меняются в
Значение элементов двумерного целочисленного массива В, оба индекса которого меняются в границах от 1 до 12, задаются с поддержкою двойного цикла, представленного последующим куском программы: В[1,1]:=2; For k:=2 to 12 do For n:=1 to k do Begin B[k,n]:=n*k-B[k-1,n]; B[n,k]:=B[k,n]; End; Сколько в этом массиве окажется чётных чисел? В ответе укажите только число, без пробелов и каких-или символов препинания, к примеру 100
Задать свой вопрос
Допишем программку и исполним её в компиляторе:
var b: array[1..100, 1..100] of integer;
k, x, n: integer;
begin
В[1,1]:=2;
For k:=2 to 12 do
For n:=1 to k do
Begin
B[k,n]:=n*k-B[k-1,n];
B[n,k]:=B[k,n];
End;
for k := 1 to 12 do
for n := 1 to k do if b[n,k] mod 2 = 0 then x := x + 1;
writeln(x);
end.
На выходе программка вывела число 39.
-
Вопросы ответы
Статьи
Информатика
Статьи
Разные вопросы.
Математика.
Разные вопросы.
Математика.
Физика.
Геометрия.
Разные вопросы.
Обществознание.
Математика.
Химия.