Предмет: Информатика, автор: lVReit

построить из элементов двумерного массива одномерный массив, элементом которого являетются четные элементы двумерного массива

Ответы

Автор ответа: valentintab24
0
var a:array [1..100,1..100] of integer; b:array [1..10000] of integer; i,j,k,m,n:integer; begin k:=0; writeln('Введите размерность массива'); read (m, n); writeln ('Введите массив'); for i:=1 to m do for j:=1 to n do read(a [i,j]); for i:=1 to m do for j:=1 to n do if (a[i,j] mod 2=0) then begin k:=k+1; b [k]:=a [i,j]; end; for i:=1 to k do write(b[i], ' '); end.
Автор ответа: valentintab24
0
После каждой точки с запятой переход на новую строку.
Автор ответа: lVReit
0
надо через процедуры
Автор ответа: valentintab24
0
Раньше надо было сказать :D
Похожие вопросы
Предмет: Русский язык, автор: ismayilovyaqub
Предмет: Алгебра, автор: Аноним