Добавить материал и получить бесплатное свидетельство о публикации в СМИ
Эл. №ФС77-60625 от 20.01.2015
Инфоурок / Информатика / Презентации / Презентация по теме урока "Одномерные массивы в Pascal"

Презентация по теме урока "Одномерные массивы в Pascal"


  • Информатика

Поделитесь материалом с коллегами:

Примеры объявления трех массивов: Names (фамилии), Ratings (оценки) и ChampSh...
Второй способ: объявление массива в разделе TYPE. TYPE Имя_типа = ARRAY [MIN....
Примеры объявления типов массивов: TNames (фамилии), TRatings (оценки) и TCha...
Переменной-массивом можно управлять как единым целым, указывая имя массива (...
При вводе массива необходимо организовать цикл. Алгоритм ввода массива с испо...
Пример 1. Вычисление суммы элементов массива Дан массив среднемесячных темпер...
Даны массивы: a: array [1..5] of integer, b: array [1..5] of integer, c: arra...
Даны массивы: a: array [1..5] of integer, b: array [1..5] of integer, c: arra...
Дан массив натуральных чисел из пяти элементов. Найти наибольший элемент. Реш...
Дан массив натуральных чисел из пяти элементов. Найти наибольший элемент. Реш...
1 из 11

Описание презентации по отдельным слайдам:

№ слайда 1 Примеры объявления трех массивов: Names (фамилии), Ratings (оценки) и ChampSh
Описание слайда:

Примеры объявления трех массивов: Names (фамилии), Ratings (оценки) и ChampShip (чемпионат) в разделе VAR . VAR {30 строковых переменных с фамилиями учеников класса} Names : ARRAY [1..30] OF string; {30 байтовых переменных с оценками учеников этого класса} Ratings : ARRAY [1..30] OF byte; {16 целых переменных с очками, набранными командами в чемпионате} ChampShip : ARRAY [1..16] OF integer; Массив может быть составлен из элементов любого типа.

№ слайда 2 Второй способ: объявление массива в разделе TYPE. TYPE Имя_типа = ARRAY [MIN.
Описание слайда:

Второй способ: объявление массива в разделе TYPE. TYPE Имя_типа = ARRAY [MIN..MAX] OF Тип_элемента; Преимущество заключается в том, что стоит лишь однажды объявить нужный нам тип, и его можно применять где угодно.

№ слайда 3 Примеры объявления типов массивов: TNames (фамилии), TRatings (оценки) и TCha
Описание слайда:

Примеры объявления типов массивов: TNames (фамилии), TRatings (оценки) и TChampShip (чемпионат) в разделе TYPE. TYPE { тип для 30 строковых переменных с фамилиями учеников класса} TNames = ARRAY [1..30] OF string; {тип для 30 байтовых переменных с оценками учеников } TRatings = ARRAY [1..30] OF byte; { тип для 16 целых переменных с очками, набранными командами в чемпионате} TChampionShip = ARRAY [1..16] OF integer;

№ слайда 4 Переменной-массивом можно управлять как единым целым, указывая имя массива (
Описание слайда:

Переменной-массивом можно управлять как единым целым, указывая имя массива (например, при копировании одного массива в другой). Но чаще приходится работать с отдельными его элементами. Для доступа к элементу массива необходимо указать его индекс, то есть порядковый номер в массиве. Пример 1. Трем элементам массива Names присваиваются фамилии хоккеистов. Names[1] :=’Петров‘; Names[2] :=’Михайлов‘; Names[3] :=’Харламов‘; Пример 2. Сравниваются третий и четвертый элемент массива Ratings. i:= 3; if Ratings[i] > Ratings[i+1] then … else …;

№ слайда 5 При вводе массива необходимо организовать цикл. Алгоритм ввода массива с испо
Описание слайда:

При вводе массива необходимо организовать цикл. Алгоритм ввода массива с использованием цикла с предусловием Алгоритм ввода массива с использованием безусловного цикла Вывод массива организуется аналогично вводу.

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

№ слайда 7 Пример 1. Вычисление суммы элементов массива Дан массив среднемесячных темпер
Описание слайда:

Пример 1. Вычисление суммы элементов массива Дан массив среднемесячных температур Т, состоящий из 12 элементов . Вычислить среднегодовую температуру Tsred. Program Temperature; {Ввод массива среднемесячных температур. Вычисление среднегодовой температуры} Var T: array[1..12] of real; {Описание одномерного массива} I: integer; Tsred: real; Begin for I:=1 to 12 step 1 do begin {Цикл ввода} Write('T[',I:2,']='); Readln(T[I]); End; Tsred:=0; {Цикл суммирования} for I:=1 to 12 do Tsred:=Tsred+T[I]; Tsred:=Tsred/12; {Вычисление средней температуры} Writeln('Среднегодовая температура', Tsred:6:2,' гр-в') End.

№ слайда 8 Даны массивы: a: array [1..5] of integer, b: array [1..5] of integer, c: arra
Описание слайда:

Даны массивы: a: array [1..5] of integer, b: array [1..5] of integer, c: array [1..5] of integer. Какое значение будет иметь элемент массива c [4] после выполнения следующих операций: 1) c [4]:=10 2) c[2]:=3; c[4]:=c[2]*2; 3) a[1]:= -10; b[2]:=10; c[4]:=a[1]+b[2]; 4) c[4]:=3; c[4]:=c[4]+1; 5) a[4]:=100; b[4]:=0; c[4]:=a[4]/b[4] 6) for i:=1 to 5 do c[i]:=50; 7) for i:=1 to 5 do c[i]:=50; for i:=1 to 5 do c[i]:=c[i]-10;

№ слайда 9 Даны массивы: a: array [1..5] of integer, b: array [1..5] of integer, c: arra
Описание слайда:

Даны массивы: a: array [1..5] of integer, b: array [1..5] of integer, c: array [1..5] of integer. Какое значение будет иметь элемент массива c [4] после выполнения следующих операций: 1) c [4]:=10 2) c[2]:=3; c[4]:=c[2]*2; 3) a[1]:= -10; b[2]:=10; c[4]:=a[1]+b[2]; 4) c[4]:=3; c[4]:=c[4]+1; 5) a[4]:=100; b[4]:=0; c[4]:=a[4]/b[4] 6) for i:=1 to 5 do c[i]:=50; 7) for i:=1 to 5 do c[i]:=50; for i:=1 to 5 do c[i]:=c[i]-10;

№ слайда 10 Дан массив натуральных чисел из пяти элементов. Найти наибольший элемент. Реш
Описание слайда:

Дан массив натуральных чисел из пяти элементов. Найти наибольший элемент. Решение: program pr1; var a: array [1..5] of integer; max,i: integer; begin for i:=1 to 5 do readln(a[i]); max:=a[1]; for i:=2 to 5 do if a[i]>max then max:=a[i]; writeln('максимальный элемент: ', max); readln; end. Переделать данную программу так, чтобы определить минимальный элемент массива.

№ слайда 11 Дан массив натуральных чисел из пяти элементов. Найти наибольший элемент. Реш
Описание слайда:

Дан массив натуральных чисел из пяти элементов. Найти наибольший элемент. Решение: program pr1; var a: array [1..5] of integer; min, I: integer; begin for i:=1 to 5 do readln(a[i]); min:=a[1]; for i:=2 to 5 do if a[i] < min then min:=a[i]; writeln(‘минимальный элемент: ', min); readln; end.


Автор
Дата добавления 08.09.2016
Раздел Информатика
Подраздел Презентации
Просмотров45
Номер материала ДБ-180809
Получить свидетельство о публикации

Похожие материалы

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