Что такое findslide.org?

FindSlide.org - это сайт презентаций, докладов, шаблонов в формате PowerPoint.

Для правообладателей

Обратная связь

Email: Нажмите что бы посмотреть 

Яндекс.Метрика

Презентация на тему Программирование на языке Паскаль

Содержание

СортировкаСортировка – это расстановка элементов массива в заданном порядке (по возрастанию, убыванию, последней цифре, сумме делителей, …). Задача: переставить элементы массива в порядке возрастания.Алгоритмы:сортировка обменом – «пузырьковая»сортировка выборомсортировка вставкамисортировка подсчетом
Программирование на языке Паскаль Урок Сортировка массивовРыжикова С. В.Учитель информатики СортировкаСортировка – это расстановка элементов массива в заданном порядке (по возрастанию, убыванию, Метод пузырькаИдея – пузырек воздуха в стакане воды поднимается со дна вверх. Программная реализация алгоритма Program C;uses crt; {пузырьковая сортировка}var a:array [1..30] Метод выбораИдея:найти минимальный элемент и поставить на первое место (поменять местами с Программная реализация алгоритма Program C; {сортировка выбором}uses crt;var b,a:array [1..30] Сортировка вставкамиИдея: основана на внедрении в отсортированную часть массива элемента следующего за Программная реализация алгоритма Program C; {сортировка вставками}uses crt;var a:array [1..30] Сортировка подсчетомИдея:основана на подсчете для каждого элемента количества элементов массива, меньших данному.от Программная реализация алгоритма Program C; {сортировка подсчетом}uses crt;var b,a:array [1..30] of Задания Program gr3;uses crt; {используем пузырьковую сортировку}var d:array [1..10] of byte;i,k,h:byte;begin clrscr; Program gr2;uses crt; {используем пузырьковую сортировку}var w:array [1..10] of byte;i,k,h:byte;begin clrscr;
Слайды презентации

Слайд 2 Сортировка
Сортировка – это расстановка элементов массива в заданном

СортировкаСортировка – это расстановка элементов массива в заданном порядке (по возрастанию,

порядке (по возрастанию, убыванию, последней цифре, сумме делителей, …).


Задача: переставить элементы массива в порядке возрастания.
Алгоритмы:
сортировка обменом – «пузырьковая»
сортировка выбором
сортировка вставками
сортировка подсчетом

Слайд 3 Метод пузырька
Идея – пузырек воздуха в стакане воды

Метод пузырькаИдея – пузырек воздуха в стакане воды поднимается со дна

поднимается со дна вверх.
Для массивов – самый маленький

("легкий") элемент перемещается вверх ("всплывает").




начиная снизу, сравниваем два соседних элемента; если они стоят "неправильно", меняем их местами
за 1 проход по массиву один элемент (самый маленький) становится на свое место



1-ый проход

2-ой проход

3-ий проход


Для сортировки массива из N элементов нужен N-1 проход (достаточно поставить на свои места N-1 элементов).

Слайд 4 Программная реализация алгоритма
Program C;
uses crt; {пузырьковая

Программная реализация алгоритма Program C;uses crt; {пузырьковая сортировка}var a:array [1..30] of

сортировка}
var a:array [1..30] of integer;
i,d,l:integer;
begin
clrscr;
randomize;
writeln ('исходный

массив');
for i:= 1 to 30 do
begin
a[i]:=random(10);
write (a[i],' ');
end;
writeln;
for l:=30 downto 2 do
for i:=1 to l-1 do
if a[i]>a[i+1] then
begin
d:=a[i];
a[i]:=a[i+1];
a[i+1]:=d;
end;
writeln('новый отсортированный массив');
for i:=1 to 30 do
write (a[i],' ');
readkey;
end.

исходный массив
8 5 7 8 0 7 2 4 8 6 8 7 0 3 9 3 1 4 2 5 4 2 0 1 8 2 4 8 3 3
новый отсортированный массив
0 0 0 1 1 2 2 2 2 3 3 3 3 4 4 4 4 5 5 6 7 7 7 8 8 8 8 8 8 9


4


Слайд 5 Метод выбора
Идея:
найти минимальный элемент и поставить на первое

Метод выбораИдея:найти минимальный элемент и поставить на первое место (поменять местами

место (поменять местами с A[1])
из оставшихся найти минимальный элемент

и поставить на второе место (поменять местами с A[2]), и т.д.







Слайд 6 Программная реализация алгоритма
Program C; {сортировка выбором}
uses

Программная реализация алгоритма Program C; {сортировка выбором}uses crt;var b,a:array [1..30] of

crt;
var b,a:array [1..30] of integer;
i,h,k,d,l:integer;
begin
clrscr;
randomize;
writeln ('исходный

массив');
for i:= 1 to 30 do
begin
a[i]:=random(10);
write (a[i],' ');
end;
writeln;
for l:=1 to 29 do
begin
k:=30-l+1;
h:=k;
for i:=1 to 30-l do
if (a[i]>a[h]) then h:=i;
d:=a[k]; a[k]:=a[h]; a[h]:=d;
end;
writeln('новый отсортированный массив');
for i:=1 to 30 do
write (a[i],' ');
readkey;
end.

исходный массив
0 7 3 8 7 2 4 8 4 7 3 0 8 5 4 7 8 4 2 7 1 1 0 8 8 5 8 3 1 7
новый отсортированный массив
0 0 0 1 1 1 2 2 3 3 3 4 4 4 4 5 5 7 7 7 7 7 7 8 8 8 8 8 8 8





















Слайд 7 Сортировка вставками
Идея:
основана на внедрении в отсортированную часть

Сортировка вставкамиИдея: основана на внедрении в отсортированную часть массива элемента следующего

массива элемента следующего за этой частью, если он удовлетворяет

условию сортировки.
на первом шаге сортировки второй элемент сравнивается с первым, на втором шаге третий элемент сравнивается с двумя первыми и т. д.
среди уже отсортированных i-1 элементов массива вставляют i-й элемент без нарушения порядка, т. е. при вставке i-го элемента на j-е место (j < i) элементы с индексами >j и

отсортированная часть массива



отсортированная часть массива




отсортированная часть массива




Слайд 8 Программная реализация алгоритма
Program C; {сортировка вставками}
uses

Программная реализация алгоритма Program C; {сортировка вставками}uses crt;var a:array [1..30] of

crt;
var a:array [1..30] of integer;
i,h,d,l:integer;
begin
clrscr;
randomize;
writeln ('исходный

массив');
for i:= 1 to 30 do
begin
a[i]:=random(10);
write (a[i],' ');
end;
writeln;
for l:=2 to 30 do
begin
d:=a[l]; h:=1;
while d>a[h] do h:=h+1;
for i:=l downto h+1 do
a[i]:=a[i-1];
a[h]:=d;
end;
writeln('новый отсортированный массив');
for i:=1 to 30 do
write (a[i],' ');
readkey;
end.

исходный массив
6 2 4 8 1 2 4 3 9 8 2 1 3 1 6 8 2 5 8 4 1 1 2 7 5 3 4 3 6 1
новый отсортированный массив
1 1 1 1 1 1 2 2 2 2 2 3 3 3 3 4 4 4 4 5 5 6 6 6 7 8 8 8 8 9


Слайд 9 Сортировка подсчетом
Идея:
основана на подсчете для каждого элемента количества

Сортировка подсчетомИдея:основана на подсчете для каждого элемента количества элементов массива, меньших

элементов массива, меньших данному.
от этого количества зависит номер каждого

элемента в новом массиве, т. е. если 5 элементов меньше данного, то его место в новом массиве будет 6-ым (при сортировке по возрастанию).

Массив А

Массив В

2 элемента его меньше

0 элементов его меньше

1 элемент его меньше

3 элемента его меньше

номер= 3+1

8

номер= 1+1

4

номер=0+1

1

6

номер= 2+1

№ 4

№ 3

№ 2

№ 1

Слайд 10 Программная реализация алгоритма
Program C; {сортировка подсчетом}
uses crt;
var

Программная реализация алгоритма Program C; {сортировка подсчетом}uses crt;var b,a:array [1..30] of

b,a:array [1..30] of integer;
i,h,l:integer;
begin
clrscr;
randomize;
writeln ('исходный массив');

for i:= 1 to 30 do
begin
a[i]:=random(10);
write (a[i],' ');
end;
writeln;
for l:= 1 to 30 do
begin
h:=0;
for i:= 1 to 30 do
if (a[i]l) then h:=h+1;
b[h+1]:=a[l];
end;
for i:=2 to 30 do
if b[i]=0 then b[i]:=b[i-1];
writeln('новый массив');
for i:=1 to 30 do write (b[i],' ');
readkey; end.

исходный массив
6 3 7 7 9 7 7 2 3 3 7 3 2 0 8 2 6 4 6 4 6 8 2 5 5 2 6 5 8 1
новый отсортированный массив
0 1 2 2 2 2 2 3 3 3 3 4 4 5 5 5 6 6 6 6 6 7 7 7 7 7 8 8 8 9





















Слайд 11
Задания
"5":Заполнить массив из 10 элементов случайными числами в

Задания

интервале [0..100] и отсортировать его по последней цифре.

Пример:
Исходный массив:
14 25 13 30 76 58 32 11 41 97
Результат:
30 11 41 32 13 14 25 76 97 58
"4": Заполнить массив из 10 элементов случайными числами в интервале [0..100] и отсортировать первую половину по возрастанию, а вторую – по убыванию.
Пример:
Исходный массив:
14 25 13 30 76 58 32 11 41 97
Результат:
13 14 25 30 76 97 58 41 32 11


решение задачи

решение задачи

Слайд 12 Program gr3;
uses crt; {используем пузырьковую сортировку}
var d:array

Program gr3;uses crt; {используем пузырьковую сортировку}var d:array [1..10] of byte;i,k,h:byte;begin clrscr;

[1..10] of byte;
i,k,h:byte;
begin
clrscr;
randomize;
writeln ('исходный массив');
for

i:= 1 to 10 do
begin
d[i]:=random(101);
write (d[i],' ');
end;
writeln;
for k:=5 downto 2 do
for i:=1 to k-1 do
if d[i]>d[i+1] then
begin
h:=d[i]; d[i]:=d[i+1]; d[i+1]:=h;
end;
for k:=10 downto 7 do
for i:=6 to k-1 do
if d[i] begin
h:=d[i]; d[i]:=d[i+1]; d[i+1]:=h;
end;
writeln('полученный массив');
for i:=1 to 10 do
write (d[i],' ');
Readkey; end.

исходный массив
26 11 23 76 62 79 88 18 55 100
полученный массив
11 23 26 62 76 100 88 79 55 18

Результат работы группы № 3




  • Имя файла: programmirovanie-na-yazyke-paskal.pptx
  • Количество просмотров: 128
  • Количество скачиваний: 1
- Предыдущая Решение задач С1 ЕГЭ
Следующая - Начало раздробленности на Руси

Похожие презентации

Мәліметтер қоры Мәліметтер қоры 231
Текстовый редактор MS Word Текстовый редактор MS Word 112
Правила поведения в компьютерном классе презентация к уроку по информатике (1 класс) по теме Правила поведения в компьютерном классе презентация к уроку по информатике (1 класс) по теме 134
Логические операции на языке программирования Паскаль. 9 класс Логические операции на языке программирования Паскаль. 9 класс 157
Презентация по информатике и ИКТ Сохранение результатов поиска информации в сети Интернет 3 класс Презентация по информатике и ИКТ Сохранение результатов поиска информации в сети Интернет 3 класс 134
Метод сортировки Шелла Метод сортировки Шелла 136
Графический интерфейс ОС Windows 2000 Графический интерфейс ОС Windows 2000 176
Строки и фалы Строки и фалы 116
Тест по теме Компьютерные вирусы Тест по теме Компьютерные вирусы 134
Современные электронные образовательные ресурсы Современные электронные образовательные ресурсы 127
SQLi for scrubz SQLi for scrubz 137
Основы программирования на Бейсике Основы программирования на Бейсике 147
Прентация по инфоратике Электронды пошта 6 класс Прентация по инфоратике Электронды пошта 6 класс 142
Управление ключевыми клиентами Управление ключевыми клиентами 132
Презентация по информатике на тему Решение оптимизационных экономических задач средствами Excel Презентация по информатике на тему Решение оптимизационных экономических задач средствами Excel 164
игра план-конспект занятия по информатике (старшая группа) игра план-конспект занятия по информатике (старшая группа) 140
Презентация по информатике на тему: Программное обеспечение компьютера Презентация по информатике на тему: Программное обеспечение компьютера 144
Лекция 1. Аналоговые и цифровые сигналы Лекция 1. Аналоговые и цифровые сигналы 116
Школьный медиацентр. Как сделать новости Школьный медиацентр. Как сделать новости 167
Автоматизированное рабочее место врача Автоматизированное рабочее место врача 134
Гипертекст Гипертекст 131
Компьютерная безопасность Компьютерная безопасность 89
Циклы в языке программирования Pascal Циклы в языке программирования Pascal 119
Устройства обработки информации Устройства обработки информации 107
Принтеры Принтеры 177
Технические средства, используемые в делопроизводстве Технические средства, используемые в делопроизводстве 141
Техника безопасности в кабинете ИВТ Техника безопасности в кабинете ИВТ 155
Кодирование звуковой информации Кодирование звуковой информации 129
Операционные системы семейства Windows Операционные системы семейства Windows 204
Синтаксис Java Синтаксис Java 163