PPt4Web Хостинг презентаций

Главная / Информатика / Язык программирования Pascal. Массивы
X Код для использования на сайте:

Скопируйте этот код и вставьте его на свой сайт

X

Чтобы скачать данную презентацию, порекомендуйте, пожалуйста, её своим друзьям в любой соц. сети.

После чего скачивание начнётся автоматически!

Кнопки:

Презентация на тему: Язык программирования Pascal. Массивы


Скачать эту презентацию

Презентация на тему: Язык программирования Pascal. Массивы


Скачать эту презентацию



№ слайда 1 Язык программирования Pascal МассивыА. Жидков
Описание слайда:

Язык программирования Pascal МассивыА. Жидков

№ слайда 2 Массивы Массив – поименованный набор однотипных элементов, каждый из которых име
Описание слайда:

Массивы Массив – поименованный набор однотипных элементов, каждый из которых имеет свой номер, (индекс). Если индексов несколько, то массив многомерный).Особенности:все элементы имеют один типвесь массив имеет одно имявсе элементы расположены в памяти рядомПримеры: список учеников в классеквартиры в домешколы в городеданные о температуре воздуха за год

№ слайда 3 Структура массиваОдномерный массив А[i] типа real из 9 элементов Двумерный масси
Описание слайда:

Структура массиваОдномерный массив А[i] типа real из 9 элементов Двумерный массив В[i,j] типа integer из 4 строк и 5 колонок.Элемент массива В[2,4]=34

№ слайда 4 Объявление массивов Зачем объявлять? определить имя массиваопределить тип массив
Описание слайда:

Объявление массивов Зачем объявлять? определить имя массиваопределить тип массиваопределить число элементоввыделить место в памяти ЭВМОбъявление массива позволяет правильно оперировать с данными и резервировать место для хранения данных в памяти.

№ слайда 5 Объявление массива целых чиселМассив описывают в секции VAR Описание через конст
Описание слайда:

Объявление массива целых чиселМассив описывают в секции VAR Описание через константу Const N=12;var A: array[1.. N] of integer;

№ слайда 6 Объявление массивов Массивы других типов:var X, Y: array [1..10] of real; C: arr
Описание слайда:

Объявление массивов Массивы других типов:var X, Y: array [1..10] of real; C: array [1..20] of char;Другой диапазон индексов: var Q: array [0..9] of real; C: array [-5..13] of char;Индексы других типов:var A: array ['A'..'Z'] of real; B: array [False..True] of integer;D: array ['a'..'z',w2..w4] of string; A['C'] := 3.14259*A['B']; B[False] := B[False] + 1;

№ слайда 7 Что нельзя делать? Нельзя в массивы целого типа вводить вещественные значенияvar
Описание слайда:

Что нельзя делать? Нельзя в массивы целого типа вводить вещественные значенияvar a: array[1..10] of integer;... A[5] := 4.5;Нельзя использовать индексы отсутствующие в перечисленияхvar a: array ['z'..‘с'] of integer;... A['B'] := 15;Нельзя выходить за пределы индексов указанные в описанииvar a: array [0..9] of integer;... A[10] := 'X';

№ слайда 8 Операции с массивами Выполняются в циклахОбъявлениеconst N = 5; var a: array[1..
Описание слайда:

Операции с массивами Выполняются в циклахОбъявлениеconst N = 5; var a: array[1..N] of integer; i: integer;Ввод данных с клавиатурыfor i:=1 to N do begin write('a[', i, ']='); read ( a[i] );end;Данные обрабатывают поэлементноfor i:=1 to N do a[i]:=a[i]*2;Вывод данных на дисплейwriteln('Массив A:');for i:=1 to N do write(a[i]:4); 10 24 68 112 26 for i:=1 to N do writeln (‘a[‘,I,’]=‘,a[i]:4); Что будет на экране?

№ слайда 9 1. Определить среднее арифметическое массива из пяти чисел. Предусмотреть, что и
Описание слайда:

1. Определить среднее арифметическое массива из пяти чисел. Предусмотреть, что изменение количества чисел должно менять только секцию описаний. program mass1;const n=5;var i:integer;a: array [1..n] of real;sr:real;beginfor i:=1 to n do begin write ('введите а[',i,']='); readln (a[i]); end;Sr:=0;for i:=1 to n do sr:= sr+a[i];sr:=sr/n;for i:=1 to n do writeln ('а[',i,']=',a[i]);writeln('среднее арифметическое sr=',sr);end.

№ слайда 10 Решение задач 2. В массиве из пяти элементов найти минимальный элемент и его ном
Описание слайда:

Решение задач 2. В массиве из пяти элементов найти минимальный элемент и его номер. Изменение количества чисел должно менять только секцию описаний program mass2;const n=5;var i,j:integer;a: array [1..n] of real;min:real;beginfor i:=1 to n do begin write (‘а[',i,']='); readln (a[i]); end;min:=a[1];for i:=1 to n do if a[i]

№ слайда 11 Задание на самоподготовку Заполнить массив случайными целыми числами из интервал
Описание слайда:

Задание на самоподготовку Заполнить массив случайными целыми числами из интервала от -7 до 25.Дан целочисленный массив, c числом элементов N, вывести все его нечетные элементы в начиная с конца и их сумму.Написать программу, которая вычисляет, сколько раз введенное с клавиатуры число встречается в массиве.Написать программу, которая проверяет, есть ли во введенном с клавиатуры массиве элементы с одинаковыми значением.

№ слайда 12 Суммирование (произведение) элементов.Поиск в массиве максимального (минимальног
Описание слайда:

Суммирование (произведение) элементов.Поиск в массиве максимального (минимального) элементов и их индексов.Поиск совпадений.Сортировка массива по убыванию и возрастанию.

№ слайда 13 Одномерный массив суммирование Создать массив 100 целых случайных чисел из интер
Описание слайда:

Одномерный массив суммирование Создать массив 100 целых случайных чисел из интервала [2;9].Найти: количество совпадений с числом введенным с клавиатуры;сумму чисел кратных трем;произведение всех чисел массива. const n = 100;var a: array[1..n] of integer; sum, pr, x : real; i,sov: integer;begin for i := 1 to n do a[i]:=Trunc(random*(9-2+1))+2; for i := 1 to n do writeln ('a[',i,']=',a[i]); writeln ('введите число для поиска'); read (x); sov:=0; for i := 1 to n do if x=a[i] then sov:=sov+1; sum := 0; for i := 1 to n do if a[i] mod 3 = 0 then sum := sum + a[i]; pr := 1; for i := 1 to n do pr := pr * a[i]; writeln('Число совпадений: ', sov); writeln('Сумма элементов: ', sum:10:2); writeln('Произведение элементов: ', pr:20:2);end.

№ слайда 14 Массив – набор элементов одного типа, имеющих общее имя, и разные номера (индекс
Описание слайда:

Массив – набор элементов одного типа, имеющих общее имя, и разные номера (индексы).Массив с двумя индексами называют двухмерным.Моделью двумерного массива является прямоугольная таблица элементов - матрица.Номер элемента состоит из двух чисел – номера строки, и номера столбца. Обращение к элементам массива имеет вид: А [ i , j ]. Это означает, что мы хотим получить элемент, расположенный в i -й строке и j -м столбце.

№ слайда 15 Описание двумерного массива Описание матрицы в разделе var аналогично описанию о
Описание слайда:

Описание двумерного массива Описание матрицы в разделе var аналогично описанию одномерного массива, только необходимо указывать диапазон изменения столбцов и строк. Const n=10; m=12;Var a:array [1..n,1..m] of integer;ИлиVar B:array [1..10,1..12] of real;

№ слайда 16 Ввод двумерного массива Паскаля с клавиатуры Writeln (‘Введите матрицу построчно
Описание слайда:

Ввод двумерного массива Паскаля с клавиатуры Writeln (‘Введите матрицу построчно’);For i:=1 to n doFor j:= 1 to m doBeginWrite (‘a[‘,i,’,’,j,’]=‘); Readln (a[i,j]);End;

№ слайда 17 Ввод двумерного массива из генератора случайных чисел Randomize;For i:=1 to n do
Описание слайда:

Ввод двумерного массива из генератора случайных чисел Randomize;For i:=1 to n do BeginFor j:=1 to m doBegina[i,j]:=random(11)+2;write(a[i,j],’ ‘);End;Writeln;End; Массив случайных целых чисел из интервала [2,12]

№ слайда 18 Суммирование элементов массива Сумма всех элементов: sum:=0; for i:=1 to n do fo
Описание слайда:

Суммирование элементов массива Сумма всех элементов: sum:=0; for i:=1 to n do for j:=1 to m do sum:=sum+a[i,j]; writеln('Сумма=',sum); Сумма элементов главной диагонали (x[1,1], x[2,2] и т.д.): sum:=0; for i:=1 to n do sum:=sum+a[i,i]; writеln ('Сумма=',sum);Cумма по столбцам с записью в массив zum[1..m]: for j:=1 to m do zum[j]:=0; for i:=1 to n do zum[j]:=zum[j]+x[i,j]; for j:=1 to m do write(zum[j]:4);

№ слайда 19 Максимальный (минимальный) элемент массива max:=a[1,1]; min:=a[1,1];for i:=1 to
Описание слайда:

Максимальный (минимальный) элемент массива max:=a[1,1]; min:=a[1,1];for i:=1 to n dofor j:=1 to m dobeginif a[i,j]>max then max:=a[i,j];if a[i,j]

№ слайда 20 Решение задач program mass2x;Const n=10; m=12;Var a:array [1..n,1..m] of integer
Описание слайда:

Решение задач program mass2x;Const n=10; m=12;Var a:array [1..n,1..m] of integer;i,j,min,max: integer; begin For i:=1 to n do BeginFor j:=1 to m do Begina[i,j]:=random(11)+2;write(a[i,j]:6,' '); End;Writeln; End;Writeln; For j:=1 to m do Begin min:=a[1,j]; max:=a[1,j]; For i:=1 to n do Beginif min>a[i,j] then min:=a[i,j];if max

№ слайда 21 Найти произведение нечетных элементов двумерного массива целых чисел. Найти сумм
Описание слайда:

Найти произведение нечетных элементов двумерного массива целых чисел. Найти сумму элементов двумерного массива, находящихся ниже главной диагонали.Найти максимальный элемент дополнительной диагонали квадратной матрицы.

Скачать эту презентацию


Презентации по предмету
Презентации из категории
Лучшее на fresher.ru