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

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

Устройства ввода-вывода Устройства ввода-вывода 123
Процессоры Процессоры 136
Перевод двоичных чисел в десятичный код Перевод двоичных чисел в десятичный код 127
Презинтация информатика 6 класс Человек и информация Презинтация информатика 6 класс Человек и информация 135
Основы программирования на С++ Основы программирования на С++ 146
Графика Графика 161
Лекция 1. Введение в теорию информации и кодирование Лекция 1. Введение в теорию информации и кодирование 156
Представление информации в памяти компьютера Представление информации в памяти компьютера 113
Работа в операционной системе Windows Работа в операционной системе Windows 139
Презентация на внеурочное занятие по информатике Координатная сетка Презентация на внеурочное занятие по информатике Координатная сетка 76
Устройство компьютера Устройство компьютера 113
Прзентация по теме Типы персоанальных компьютеров Прзентация по теме Типы персоанальных компьютеров 133
Клавиатура инструмент писателя Клавиатура инструмент писателя 111
Основные понятия мультимедиа Основные понятия мультимедиа 108
Корпорация Microsoft и её подразделения Корпорация Microsoft и её подразделения 105
Информатика как наука и вид практической деятельности Информатика как наука и вид практической деятельности 139
Двоичное кодирование Двоичное кодирование 153
Федеральное Казначейство. Синхронизация Сводного реестра и ЕИС Статистика Федеральное Казначейство. Синхронизация Сводного реестра и ЕИС Статистика 119
Математические модели (7 класс) Математические модели (7 класс) 196
Основные понятия и этапы управления рисками Основные понятия и этапы управления рисками 93
Массивы Массивы 125
Презентация по информатике Связь науки с развитием промышленности Презентация по информатике Связь науки с развитием промышленности 135
Возможности настольных издательских систем Возможности настольных издательских систем 152
Информация Информация 148
Активизация интереса дошкольников к музыкальной деятельности посредством информационно-коммуникативных технологий Активизация интереса дошкольников к музыкальной деятельности посредством информационно-коммуникативных технологий 104
Руководство по созданию виртуальной машины в Virtual Box Руководство по созданию виртуальной машины в Virtual Box 146
Разработка WEB - приложения для фирмы по продаже мебели Разработка WEB - приложения для фирмы по продаже мебели 182
Презентация по информатике на тему Компьютерные вирусы Презентация по информатике на тему Компьютерные вирусы 138
Применение формул для вычисления в таблицах, созданных в Microsoft Word 2007 Применение формул для вычисления в таблицах, созданных в Microsoft Word 2007 194
Типы меню в программе Microsoft Access Типы меню в программе Microsoft Access 165