Что такое 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
  • Количество просмотров: 112
  • Количество скачиваний: 0
- Предыдущая Сущность и виды языковых норм
Следующая - Лекция: Местная анестезия

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

Вложенные циклы Вложенные циклы 81
Презентация по информатике на темуИнформация вокруг нас Презентация по информатике на темуИнформация вокруг нас 113
Повышение квалификации по ИКТ Повышение квалификации по ИКТ 129
Мобильная зависимость и её последствия Мобильная зависимость и её последствия 122
Массивы Массивы 125
КОМПЬЮТЕРНАЯ ГРАФИКА КОМПЬЮТЕРНАЯ ГРАФИКА 153
Презинтация. Клавиатура.Основные позиции пальцев Презинтация. Клавиатура.Основные позиции пальцев 100
Кодирование графической информации Кодирование графической информации 104
Безопасная работа в Интернете Безопасная работа в Интернете 93
Взаимодействие PHP и MySQL Взаимодействие PHP и MySQL 122
Локальная компьютерная сеть Локальная компьютерная сеть 95
Разработка программы по теме “Шифрование и дешифрование осмысленного текста с ключом” Разработка программы по теме “Шифрование и дешифрование осмысленного текста с ключом” 77
Способы решения уравнений с помощью компьютера Способы решения уравнений с помощью компьютера 88
Презентация по информатике на тему База данных. Презентация по информатике на тему База данных. 126
Понятие и виды публикации Понятие и виды публикации 106
История развития носителей информации История развития носителей информации 102
Задачи сортировки для одномерного массива Задачи сортировки для одномерного массива 105
Стандарты сжатия движущихся изображений и MPEG-1 и MPEG-2 Стандарты сжатия движущихся изображений и MPEG-1 и MPEG-2 93
Что такое электронная коммерция? Что такое электронная коммерция? 108
ПРЕЗЕНТАЦИЯ К ИНТЕГРИРОВАННОМУ ЗАНЯТИЮ С ПРИМЕНЕНИЕМ ИКТ для детей старшего дошкольного возраста с ОНР Космическо-математическое путешествие электронный образовательный ресурс по информатике (старшая группа) ПРЕЗЕНТАЦИЯ К ИНТЕГРИРОВАННОМУ ЗАНЯТИЮ С ПРИМЕНЕНИЕМ ИКТ для детей старшего дошкольного возраста с ОНР Космическо-математическое путешествие электронный образовательный ресурс по информатике (старшая группа) 34
Презентация по информатике на тему: Классификация сетей Презентация по информатике на тему: Классификация сетей 121
Алгоритми роботи з об’єктами та величинами. (8 клас) Алгоритми роботи з об’єктами та величинами. (8 клас) 88
Печать чертежей в AutoCAD 2008 Печать чертежей в AutoCAD 2008 128
Виды графики Виды графики 111
Элементы логики в пропедевтическом курсе информатики и ИКТ Элементы логики в пропедевтическом курсе информатики и ИКТ 104
Угадайка Угадайка 102
ИГРА ПО ТЕМЕ: СИСТЕМЫ СЧИСЛЕНИЯ ИГРА ПО ТЕМЕ: СИСТЕМЫ СЧИСЛЕНИЯ 114
Инструментальные средства ГИС Инструментальные средства ГИС 124
Бейсик Бейсик 131
Двухкомпонентный курс информатики для начальной школы Двухкомпонентный курс информатики для начальной школы 122