Что такое 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
  • Количество просмотров: 130
  • Количество скачиваний: 1
- Предыдущая Решение задач С1 ЕГЭ
Следующая - Начало раздробленности на Руси

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

Обзор методов анализа долговечности с помощью программ MSC Обзор методов анализа долговечности с помощью программ MSC 131
Советы родителям: как помочь детям подготовиться к экзаменам Советы родителям: как помочь детям подготовиться к экзаменам 109
Урок 2 Форма предмета Урок 2 Форма предмета 137
Язык программирования QBasic. Массивы. Язык программирования QBasic. Массивы. 162
Язык программирования - SQL Язык программирования - SQL 152
История развития ЭВМ История развития ЭВМ 239
Модели данных и базы данных Модели данных и базы данных 121
Как нужно оформлять презентацию Как нужно оформлять презентацию 120
Презентация по информатике Носители информации 5 класс Презентация по информатике Носители информации 5 класс 131
Презентация к уроку по теме Создание Flash-анимации, 10 класс Презентация к уроку по теме Создание Flash-анимации, 10 класс 191
Компьютерные вирусы. Антивирусные программы. Компьютерные вирусы. Антивирусные программы. 156
Работа с числовыми данными в Pascal ABC. Целые числа Работа с числовыми данными в Pascal ABC. Целые числа 104
Открытое программное обеспечение OpenOffice Открытое программное обеспечение OpenOffice 122
Презентация по информатике Использование средств ИКТ при анализе процессов в обществе, в природе и технике Презентация по информатике Использование средств ИКТ при анализе процессов в обществе, в природе и технике 169
Объекты алгоритмов. Объекты алгоритмов. 228
Компьютерные игры хорошо или плохо Компьютерные игры хорошо или плохо 199
Основы моделирования средствами языка GPSS Основы моделирования средствами языка GPSS 124
Текстовый процессор Microsoft Word Текстовый процессор Microsoft Word 116
ДЕЙСТВИЕ С ИНФОРМАЦИЕЙ. ХРАНЕНИЕ ИНФОРМАЦИИ ДЕЙСТВИЕ С ИНФОРМАЦИЕЙ. ХРАНЕНИЕ ИНФОРМАЦИИ 126
Интерактивные доски Интерактивные доски 141
Системы счисления 8 класс Системы счисления 8 класс 119
Презентация к уроку по теме: Информационная безопасность в сети интернет Презентация к уроку по теме: Информационная безопасность в сети интернет 151
Что умеет компьютер? Что умеет компьютер? 126
Архитектура персонального компьютера Архитектура персонального компьютера 101
Правила безопасности в Интернете Правила безопасности в Интернете 155
Босова. Информатика Босова. Информатика 196
Умозаключение как форма мышления Умозаключение как форма мышления 111
Зависимость от Интернета Зависимость от Интернета 94
Полезные и отрицательные свойства мобильной связи и интернета Полезные и отрицательные свойства мобильной связи и интернета 165
Основные компоненты компьютера Основные компоненты компьютера 142