Двумерный массив - презентация, доклад, проект скачать

Нажмите для полного просмотра!

Содержание ▲

Вы можете ознакомиться и скачать презентацию на тему Двумерный массив. Доклад-сообщение содержит 19 слайдов. Презентации для любого класса можно скачать бесплатно. Если материал и наш сайт презентаций Mypresentation Вам понравились – поделитесь им с друзьями с помощью социальных кнопок и добавьте в закладки в своем браузере.

Слайды и текст этой презентации

Слайд 1

Описание слайда:

Двумерный массив

Слайд 2

Описание слайда:

Объявление массива Var a:array [1..4, 1..3] of integer; Const n=4; m=3; Var a:array [1..n, 1..m] of integer;

Слайд 3

Описание слайда:

Ввод значений For i:= 1 to n do for j:=1 to m do begin write (‘A[‘,i,j,’]=’); readln(a[i,j]); {с клавиатуры} end;

Слайд 4

Описание слайда:

Ввод значений For i:= 1 to n do for j:=1 to m do a[i,j]:= i*j; {по формуле}

Слайд 5

Описание слайда:

Ввод значений For i:= 1 to n do for j:=1 to m do a[i,j]:= random(100); {заполнение массива случайными числами}

Слайд 6

Описание слайда:

Вывод матрицы в виде таблицы Writeln(‘вывод исходного массива A[I,j]’); For i:= 1 to n do begin for j:=1 to m do begin write(a[i,j]:5); end; writeln; End;

Слайд 7

Описание слайда:

Ввод матрицы с клавиатуры и вывод ее в виде таблицы Uses crt; Var a:array [1..4, 1..3] of integer; Begin N:=4; m:=3; For i:= 1 to n do for j:=1 to m do begin readln(a[i,j]); {с клавиатуры} Gotoxy(5*j,i+6); write (A[i,j]); end;

Слайд 8

Описание слайда:

Приемы программирования

Слайд 9

Описание слайда:

Приемы программирования {нахождение суммы всех элементов по строкам} For i:= 1 to n do begin S:=0; for j:=1 to m do S:=S+A[i,j];{сумма значений в строке} writeln(S); end;

Слайд 10

Описание слайда:

Приемы программирования {нахождение суммы всех элементов по столбцам} For j:= 1 to m do begin S:=0; for i:=1 to n do S:=S+A[i,j];{сумма значений в столбце} writeln(S); end;

Слайд 11

Описание слайда:

Приемы программирования {нахождение произведения всех элементов} p:=1; For i:= 1 to n do for j:=1 to m do p:=p*A[i,j];

Слайд 12

Описание слайда:

Приемы программирования нахождение среднего арифметического всех элементов} S:=0; For i:= 1 to n do for j:=1 to m do S:=S+A[i,j];{сумма значений в столбце} end; Sr:=S/(n*m); writeln(‘среднее арифметическое-’Sr:7:2);

Слайд 13

Описание слайда:

Приемы программирования {поиск наибольшего элемента в матрице} Max:=a[1,1]; For i:= 1 to n do for j:=1 to m do if a[i,j]>max then max:=a[i,j]; writeln(‘наибольшее значение-’,max);

Слайд 14

Описание слайда:

Приемы программирования {найти наименьшее значение из максимумов в каждой строке} Min:=10000; For i:=1 to n do begin Max:=a[i,1]; for j:=1 to m do begin if a[i,j]>max then max:=a[i,j]; end; if max<min then min:=max; End; Writeln (‘min=’,min);