Надо расположить команды в турнирной таблице футбольного чемпионата в порядке убывания набранных ими очков. Команд немного, всего 16. После каждого тура количество набранных ими очков меняется и сортировку надо выполнять заново. Что будем делать? Будущая программа должна принимать с клавиатуры очки, набранные командами, и распечатывать команды в порядке убывания этих чисел.

Мы умеем сравнивать два числа. Используем алгоритм сравнения двух чисел для сортировки двух команд, например «Динамо» и «Спартак». Программа будет выглядеть так: var T1, T2 : integer; begin readln (T1, T2); if T1>T2 then begin writeln (1.Динамо); writeln (2. Спартак); end; else begin writeln (1. Спартак); writeln (2. Динамо); end; readln; end.

Что такое массив? Объявление массива. Доступ к элементам массива (индексация). Доступ к элементам массива (индексация). Ввод и вывод массивов. Обработка массивов. Задание Задание 2. Итоги урока.

Простые переменные Массивы переменных

Массив – это сложный тип данных, объединяющий в себе несколько однотипных переменных под одним общим именем. Отдельные переменные в массиве являются его элементами, доступ к ним возможен по их номерам. Имя массива – это обычный идентификатор, его программист придумывает сам. Диапазон для индексов – определяет допустимые номера элементов внутри массива.

Объявление массива делается либо в разделе VAR, либо через объявление пользовательского типа в разделе TYPE. Первый вариант: Var Имя_массива : ARRAY [MIN..MAX] OF Тип_элемента; Имя массива – это обычный идентификатор, его программист придумывает сам. Диапазон для индексов – определяет допустимые номера элементов внутри массива.

Примеры объявления трех массивов: 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; Массив может быть составлен из элементов любого типа.

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

Примеры объявления типов массивов: 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;

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

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

Пример 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.

Даны массивы: 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;

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

Дан массив натуральных чисел из пяти элементов. Найти наибольший элемент. Решение: 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. Переделать данную программу так, чтобы определить минимальный элемент массива.

Дан массив натуральных чисел из пяти элементов. Найти наибольший элемент. Решение: 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.

Массив – это сложный тип данных, объединяющий в себе несколько однотипных переменных, называемых элементами массива. Все элементы массива имеют одно общее имя, - это имя самого массива. Внутри массива элементы различаются своими порядковыми номерами – индексами. В объявлении массива указываются две его характеристики: диапазон индексов и тип элементов. Индекс элемента может быть задан числом или выражением порядкового типа. Указание неверного индекса порождает ошибки либо при компиляции, либо при выполнении программы. Ввод (вывод) массива возможен только поэлементно, для чего организуется цикл.

Деревенец О.В. Песни о Паскале г. Единая коллекция цифровых образовательных ресурсов. Материалы по информатике к учебнику Информатика-9 Базовый курс, И. Семакин и др. collection.edu.ru/catalog/search/?text=%EE%E4%ED%EE%EC%E5 %F0%ED%FB%E9+%EC%E0%F1%F1%E8%E2&tg=&context=curr ent&interface=pupil&class%5B%5D=51&subject%5B%5D=19&rub_g uid%5B%5D=a30a9550-6a62-11da-8cd c9a66http://school- collection.edu.ru/catalog/search/?text=%EE%E4%ED%EE%EC%E5 %F0%ED%FB%E9+%EC%E0%F1%F1%E8%E2&tg=&context=curr ent&interface=pupil&class%5B%5D=51&subject%5B%5D=19&rub_g uid%5B%5D=a30a9550-6a62-11da-8cd c9a66 шаблон презентации с официального сайта Майкрософт aspx