- Главная
- Разное
- Образование
- Спорт
- Естествознание
- Природоведение
- Религиоведение
- Французский язык
- Черчение
- Английский язык
- Астрономия
- Алгебра
- Биология
- География
- Геометрия
- Детские презентации
- Информатика
- История
- Литература
- Математика
- Музыка
- МХК
- Немецкий язык
- ОБЖ
- Обществознание
- Окружающий мир
- Педагогика
- Русский язык
- Технология
- Физика
- Философия
- Химия
- Шаблоны, фоны, картинки для презентаций
- Экология
- Экономика
Презентация, доклад на тему Сортировка одномерного массива
Содержание
- 1. Сортировка одномерного массива
- 2. Сегодня на уроке мы рассмотримПРОСТОЙ ВЫБОР
- 3. Малыш,давай меняться
- 4. Слайд 4
- 5. Слайд 5
- 6. Слайд 6
- 7. Слайд 7
- 8. Что изменилось?
- 9. ЧТО ДАЛЬШЕ ?Поменяем местами голубой и синий прямоугольники.
- 10. Слайд 10
- 11. Слайд 11
- 12. Слайд 12
- 13. Слайд 13
- 14. Слайд 14
- 15. Слайд 15
- 16. Напишите блок-схему.
- 17. Программа (BASIC)10 REM Выбор20 DIM A(N)30 FOR
- 18. Программа (PASCAL)program выбор; var i, j, k, n,
- 19. На этом наш урок оконченНа следующем уроке мы изучим другие способы сортировки
- 20. Автор Фархуллин Р. С.Малокирменская СОШКружок «Информатики»2003 год
Сегодня на уроке мы рассмотримПРОСТОЙ ВЫБОР
Слайд 17Программа (BASIC)
10 REM Выбор
20 DIM A(N)
30 FOR I=1 TO N
40 INPUT
“Введите A(”, I, “)”, A(I)
50 NEXT I
60 FOR I=1 TO N-1
70 M=A(I): K=I
80 FOR J=I+1 TO N
90 IF A(I)100 NEXT J
110 X=A(I): A(I)=M: A(K)=X
120 NEXT I
130 FOR I=1 TO N
140 PRINT “A(”, I, “)=”, A(I)
150 NEXT I
160 END
50 NEXT I
60 FOR I=1 TO N-1
70 M=A(I): K=I
80 FOR J=I+1 TO N
90 IF A(I)
110 X=A(I): A(I)=M: A(K)=X
120 NEXT I
130 FOR I=1 TO N
140 PRINT “A(”, I, “)=”, A(I)
150 NEXT I
160 END
Слайд 18Программа (PASCAL)
program выбор;
var i, j, k, n, m: integer;
a: array [1..n] of integer;
begin for i:=1 to n do
begin
write (‘Введите a[‘; i;‘]’); readln(a[i]);
end;
for i:=1 to n-1 do
begin m:=a[i]; k:=i;
for j:=i+1 to n do
begin
if a[j] end;
x:=a[i]; a[i]:=m; a[k]:=x;
end;
for i:=1 to n do write (‘a[‘; i;‘]=’, a[i] );
end.
begin for i:=1 to n do
begin
write (‘Введите a[‘; i;‘]’); readln(a[i]);
end;
for i:=1 to n-1 do
begin m:=a[i]; k:=i;
for j:=i+1 to n do
begin
if a[j]
x:=a[i]; a[i]:=m; a[k]:=x;
end;
for i:=1 to n do write (‘a[‘; i;‘]=’, a[i] );
end.
![Программа (PASCAL)program выбор; var i, j, k, n, m: integer; a: array [1..n] of integer;begin](/img/thumbs/cfe1dc946d18022720d8d40b8234dd17-800x.jpg "Сортировка одномерного массива Программа (PASCAL)program выбор; var i, j, k, n, m: integer; a:")
