2006 2011 http kpolyakov narod ru II 13

  • Slides: 35
Download presentation
Массивы К. Поляков, 2006 -2011 http: //kpolyakov. narod. ru

Массивы К. Поляков, 2006 -2011 http: //kpolyakov. narod. ru

Программирование на языке Паскаль. Часть II 13 Поиск элемента в массиве program qq; var

Программирование на языке Паскаль. Часть II 13 Поиск элемента в массиве program qq; var a: array[1. . 100] of integer; i, X, N: integer; begin { ввод массива } i: =1; while (i<=N) and (A[i]<>X) do i: =i+1; if i <= N then writeln(X) else writeln('Не нашли. . . '); end. К. Поляков, 2006 -2011 http: //kpolyakov. narod. ru

30 Программирование на языке Паскаль. Часть II Матрицы Объявление: var A: array[1. . 100,

30 Программирование на языке Паскаль. Часть II Матрицы Объявление: var A: array[1. . 100, 1. . 100] of integer; B: array[-3. . 0, -8. . 0] of real; Ввод с клавиатуры: readln(N, M); for i: =1 to N do for j: =1 to M do begin read ( A[i, j] ); end; К. Поляков, 2006 -2011 i j A[1, 1]= A[1, 2]= A[1, 3]=. . . A[3, 4]= 25 14 14 54 http: //kpolyakov. narod. ru