Перестановка элементов в одномерном массиве

Содержание

1. Перестановка элементов в одномерном массиве
2. План построения программы.1)описание переменных. 2)стандартный ввод-вывод массива.3)поиск
3. 1)описание переменных. Var A:array[1..25] of integer;
4. 3) поиск и удвоение положительных элементов. For
5. Var A:array[1..25] of integer; i:
6. а) Var A: array(1..100) of integer;
7. Var A: array[1..100] of integer;
8. а) For i=1 to 15 do
9. а) s:=0;
10. Был массив: 10, 30, -7, 15,
11. Тема урока: «Перестановка элементов в одномерном массиве»Цель урока: научиться переставлять элементы массива
12. Схема перестановки двух элементов с использованием промежуточной переменной
13. pr:=a[i];a[i]:=a[j];a[j]=pr;Алгоритм перестановки двух элементов в общем виде.
14. План построения программы.1)описание переменных. 2)стандартный ввод-вывод массива.3)
15. Program z1;Var A:array[1..10] of integer;
16. Пришло время попробовать свои силы за компьютером.
17. Повторить известные алгоритмы обработки массивов, выучить алгоритм
18. Скачать презентанцию

План построения программы.1)описание переменных. 2)стандартный ввод-вывод массива.3)поиск и удвоение положительных элементов4)вывод элементов массива в строку.Задать массив, состоящий из 25 целых чисел. Удвоить положительные элементы массива, остальные оставить без изменения.

Главная
Информатика
Перестановка элементов в одномерном массиве

Слайды и текст этой презентации

Слайд 1 Не существует проблем,
Не содержащих в себе дар,
Предназначенный вам.
Вы ищите проблемы,
Потому

что вам нужны их дары.
Ричард Бах.

Слайд 2План построения программы.
1)описание переменных.
2)стандартный ввод-вывод массива.
3)поиск и удвоение положительных

элементов
4)вывод элементов массива в строку.

Задать массив, состоящий из 25 целых

чисел. Удвоить положительные элементы массива, остальные оставить без изменения.

План построения программы.1)описание переменных. 2)стандартный ввод-вывод массива.3)поиск и удвоение положительных элементов4)вывод элементов массива в строку.Задать массив, состоящий

Слайд 31)описание переменных.
Var A:array[1..25] of integer;
i: integer;
2)стандартный

ввод-вывод исходного массива.
randomize;
For i:=1 to 25 do
Begin
a[i]:=-10+random(21);
write(a[i]:4);
end; writeln;

Задать массив, состоящий

из 25 целых чисел. Удвоить положительные элементы массива, остальные оставить без изменения.

1)описание переменных. Var A:array[1..25] of integer; i: integer;2)стандартный ввод-вывод исходного массива.randomize;For i:=1 to 25 doBegina[i]:=-10+random(21);write(a[i]:4);end;

Слайд 43) поиск и удвоение положительных элементов.
For i:=1 to 25

do
If a[i]>0 then a[i]:=2*a[i];

4) вывод обработанного массива в строку.
For i:=1

to 25 do
write(a[i]:4);
writeln;

Задать массив, состоящий из 25 целых чисел. Удвоить положительные элементы массива, остальные оставить без изменения.

3) поиск и удвоение положительных элементов. For i:=1 to 25 doIf a[i]>0 then a[i]:=2*a[i];4) вывод обработанного массива

Слайд 5Var A:array[1..25] of integer;
i: integer;
begin
randomize;
For i:=1 to

25 do
Begin
a[i]:=-10+random(21);
write(a[i]:4);
end; writeln;
For i:=1 to 25 do
If a[i]>0 then

a[i]:=2*a[i];
For i:=1 to 25 do
write(a[i]:4);
writeln;
end.

Var A:array[1..25] of integer; i: integer;beginrandomize;For i:=1 to 25 doBegina[i]:=-10+random(21);write(a[i]:4);end; writeln;For i:=1 to 25 do

Слайд 6а) Var A: array(1..100) of integer;

б)

Var A: array[1…100] of integer;

в) Var A: array[1..10] of readln;

г) Var A: array[1..10] of integer;

1)Найдите ошибки при описании массива и правильный вариант:

а) Var A: array(1..100) of integer; б) Var A: array[1…100] of integer;в) Var A:

Слайд 7Var A: array[1..100] of integer;
i:integer;
Begin
For i:=1

to 15 do
readln(A[i]);

2)Сколько элементов в массиве и каким

способом задаются элементы массива?

Var A: array[1..100] of integer; i:integer;BeginFor i:=1 to 15 do readln(A[i]);2)Сколько элементов в

Слайд 8а) For i=1 to 15 do

б) For i:=1 to 15 do;
readln(A[i]); readln(A[i]);

в)randomize; г)randomize;
For i:=1 to 15 do For i:=1 to 15 do
Begin Begin
a[i]:=-10+random[21]; a[i]:=-10+random(21);
write(a(i):4); write(a[i]:4);
end; writeln; end; writeln;

3) Найдите ошибки при задании массива и правильный вариант :

Слайд 9а) s:=0;

б)k:=0
For i:=1 to 20 do For i:=1 to 15 do
s:=s+a[i]; if a[i]>0 then k:=k+1;

в) For i:=1 to 20 do
if a[i] mod 2 =0 then write(a[i]:4);

г)max:=a[1];
For i:=1 to 20 do
if a[i]>max then max:=a[i];

4)Зачем нужен каждый алгоритм (что делает с массивом)?

Слайд 10Был массив:
10, 30, -7, 15, 75, 16, -5,

0, 14, -10
Стал массив:
10, 75, -7, 15, 30,

16, -5, 0, 14, -10

Нужно поменять местами 2-й и 5-й элементы массива, состоящего из десяти целых чисел.

Слайд 11Тема урока: «Перестановка элементов в одномерном массиве»
Цель урока: научиться переставлять

элементы массива

Слайд 12Схема перестановки двух элементов с использованием промежуточной переменной

Слайд 13pr:=a[i];
a[i]:=a[j];
a[j]=pr;

Алгоритм перестановки двух элементов в общем виде.

Слайд 14План построения программы.
1)описание переменных.
2)стандартный ввод-вывод массива.
3) перестановка элементов.
4)вывод элементов

массива в строку.

Нужно поменять местами 2-й и 5-й элементы массива,

состоящего из десяти целых чисел.

План построения программы.1)описание переменных. 2)стандартный ввод-вывод массива.3) перестановка элементов.4)вывод элементов массива в строку.Нужно поменять местами 2-й и

Слайд 15Program z1;
Var A:array[1..10] of integer;
i,pr: integer;
begin
randomize;
For i:=1

to 10 do
Begin
a[i]:=-10+random(21);
write(a[i]:4);
end; writeln;
pr:=a[2];
a[2]:=a[5];
a[5]:=pr;
For i:=1 to 10 do
write(a[i]:4);
writeln;
end.

Нужно поменять местами

2-й и 5-й элементы массива, состоящего из десяти целых чисел.

Program z1;Var A:array[1..10] of integer; i,pr: integer;beginrandomize;For i:=1 to 10 doBegina[i]:=-10+random(21);write(a[i]:4);end; writeln;pr:=a[2];a[2]:=a[5];a[5]:=pr;For i:=1 to 10

Слайд 16Пришло время попробовать свои силы за компьютером.

Слайд 17Повторить известные алгоритмы обработки массивов, выучить алгоритм перестановки.

Написать программу решения

задачи
Задать массив, состоящий из 20 целых чисел. Поменять местами 3-й

и максимальный элементы массива.

Домашнее задание.

Повторить известные алгоритмы обработки массивов, выучить алгоритм перестановки.Написать программу решения задачиЗадать массив, состоящий из 20 целых чисел.

Скачать презентацию

Разделы презентаций

Перестановка элементов в одномерном массиве

Содержание

Слайды и текст этой презентации

Слайд 1 Не существует проблем,
Не содержащих в себе дар,
Предназначенный вам.
Вы ищите проблемы,
Потому

что вам нужны их дары.
Ричард Бах.

Слайд 2План построения программы.
1)описание переменных.
2)стандартный ввод-вывод массива.
3)поиск и удвоение положительных

элементов
4)вывод элементов массива в строку.

Задать массив, состоящий из 25 целых

Слайд 31)описание переменных.
Var A:array[1..25] of integer;
i: integer;
2)стандартный

ввод-вывод исходного массива.
randomize;
For i:=1 to 25 do
Begin
a[i]:=-10+random(21);
write(a[i]:4);
end; writeln;

Задать массив, состоящий

Слайд 43) поиск и удвоение положительных элементов.
For i:=1 to 25

do
If a[i]>0 then a[i]:=2*a[i];

4) вывод обработанного массива в строку.
For i:=1

Слайд 5Var A:array[1..25] of integer;
i: integer;
begin
randomize;
For i:=1 to

25 do
Begin
a[i]:=-10+random(21);
write(a[i]:4);
end; writeln;
For i:=1 to 25 do
If a[i]>0 then

Слайд 6а) Var A: array(1..100) of integer;

б)

Var A: array[1…100] of integer;

в) Var A: array[1..10] of readln;

Слайд 7Var A: array[1..100] of integer;
i:integer;
Begin
For i:=1

to 15 do
readln(A[i]);

2)Сколько элементов в массиве и каким

Слайд 8а) For i=1 to 15 do

Слайд 9а) s:=0;

Слайд 10Был массив:
10, 30, -7, 15, 75, 16, -5,

0, 14, -10
Стал массив:
10, 75, -7, 15, 30,

Слайд 11Тема урока: «Перестановка элементов в одномерном массиве»
Цель урока: научиться переставлять

элементы массива

Слайд 12Схема перестановки двух элементов с использованием промежуточной переменной

Слайд 13pr:=a[i];
a[i]:=a[j];
a[j]=pr;

Алгоритм перестановки двух элементов в общем виде.

Слайд 14План построения программы.
1)описание переменных.
2)стандартный ввод-вывод массива.
3) перестановка элементов.
4)вывод элементов

массива в строку.

Нужно поменять местами 2-й и 5-й элементы массива,

Слайд 15Program z1;
Var A:array[1..10] of integer;
i,pr: integer;
begin
randomize;
For i:=1

to 10 do
Begin
a[i]:=-10+random(21);
write(a[i]:4);
end; writeln;
pr:=a[2];
a[2]:=a[5];
a[5]:=pr;
For i:=1 to 10 do
write(a[i]:4);
writeln;
end.

Нужно поменять местами

Слайд 16Пришло время попробовать свои силы за компьютером.

Слайд 17Повторить известные алгоритмы обработки массивов, выучить алгоритм перестановки.

Написать программу решения

задачи
Задать массив, состоящий из 20 целых чисел. Поменять местами 3-й

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

Что такое TheSlide.ru?

Разделы презентаций

Перестановка элементов в одномерном массиве

Содержание

Слайды и текст этой презентации

Слайд 1 Не существует проблем, Не содержащих в себе дар, Предназначенный вам. Вы ищите проблемы, Потому

что вам нужны их дары.Ричард Бах.

Слайд 2План построения программы.1)описание переменных. 2)стандартный ввод-вывод массива.3)поиск и удвоение положительных

элементов4)вывод элементов массива в строку.Задать массив, состоящий из 25 целых

Слайд 31)описание переменных. Var A:array[1..25] of integer; i: integer;2)стандартный

ввод-вывод исходного массива.randomize;For i:=1 to 25 doBegina[i]:=-10+random(21);write(a[i]:4);end; writeln;Задать массив, состоящий

Слайд 43) поиск и удвоение положительных элементов. For i:=1 to 25

doIf a[i]>0 then a[i]:=2*a[i];4) вывод обработанного массива в строку.For i:=1

Слайд 5Var A:array[1..25] of integer; i: integer;beginrandomize;For i:=1 to

25 doBegina[i]:=-10+random(21);write(a[i]:4);end; writeln;For i:=1 to 25 do If a[i]>0 then

Слайд 6а) Var A: array(1..100) of integer; б)

Var A: array[1…100] of integer;в) Var A: array[1..10] of readln;

Слайд 7Var A: array[1..100] of integer; i:integer;BeginFor i:=1

to 15 do readln(A[i]);2)Сколько элементов в массиве и каким

Слайд 8а) For i=1 to 15 do

Слайд 9а) s:=0;

Слайд 10Был массив: 10, 30, -7, 15, 75, 16, -5,

0, 14, -10Стал массив: 10, 75, -7, 15, 30,

Слайд 11Тема урока: «Перестановка элементов в одномерном массиве»Цель урока: научиться переставлять

элементы массива

Слайд 12Схема перестановки двух элементов с использованием промежуточной переменной

Слайд 13pr:=a[i];a[i]:=a[j];a[j]=pr;Алгоритм перестановки двух элементов в общем виде.

Слайд 14План построения программы.1)описание переменных. 2)стандартный ввод-вывод массива.3) перестановка элементов.4)вывод элементов

массива в строку.Нужно поменять местами 2-й и 5-й элементы массива,

Слайд 15Program z1;Var A:array[1..10] of integer; i,pr: integer;beginrandomize;For i:=1

to 10 doBegina[i]:=-10+random(21);write(a[i]:4);end; writeln;pr:=a[2];a[2]:=a[5];a[5]:=pr;For i:=1 to 10 dowrite(a[i]:4);writeln;end.Нужно поменять местами

Слайд 16Пришло время попробовать свои силы за компьютером.

Слайд 17Повторить известные алгоритмы обработки массивов, выучить алгоритм перестановки.Написать программу решения

задачиЗадать массив, состоящий из 20 целых чисел. Поменять местами 3-й

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

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

Что такое TheSlide.ru?

Слайд 1 Не существует проблем,
Не содержащих в себе дар,
Предназначенный вам.
Вы ищите проблемы,
Потому

что вам нужны их дары.
Ричард Бах.

Слайд 2План построения программы.
1)описание переменных.
2)стандартный ввод-вывод массива.
3)поиск и удвоение положительных

элементов
4)вывод элементов массива в строку.

Задать массив, состоящий из 25 целых

Слайд 31)описание переменных.
Var A:array[1..25] of integer;
i: integer;
2)стандартный

ввод-вывод исходного массива.
randomize;
For i:=1 to 25 do
Begin
a[i]:=-10+random(21);
write(a[i]:4);
end; writeln;

Задать массив, состоящий

Слайд 43) поиск и удвоение положительных элементов.
For i:=1 to 25

do
If a[i]>0 then a[i]:=2*a[i];

4) вывод обработанного массива в строку.
For i:=1

Слайд 5Var A:array[1..25] of integer;
i: integer;
begin
randomize;
For i:=1 to

25 do
Begin
a[i]:=-10+random(21);
write(a[i]:4);
end; writeln;
For i:=1 to 25 do
If a[i]>0 then

Слайд 6а) Var A: array(1..100) of integer;

б)

Var A: array[1…100] of integer;

в) Var A: array[1..10] of readln;

Слайд 7Var A: array[1..100] of integer;
i:integer;
Begin
For i:=1

to 15 do
readln(A[i]);

2)Сколько элементов в массиве и каким

Слайд 10Был массив:
10, 30, -7, 15, 75, 16, -5,

0, 14, -10
Стал массив:
10, 75, -7, 15, 30,

Слайд 11Тема урока: «Перестановка элементов в одномерном массиве»
Цель урока: научиться переставлять

Слайд 13pr:=a[i];
a[i]:=a[j];
a[j]=pr;

Алгоритм перестановки двух элементов в общем виде.

Слайд 14План построения программы.
1)описание переменных.
2)стандартный ввод-вывод массива.
3) перестановка элементов.
4)вывод элементов

массива в строку.

Нужно поменять местами 2-й и 5-й элементы массива,

Слайд 15Program z1;
Var A:array[1..10] of integer;
i,pr: integer;
begin
randomize;
For i:=1

to 10 do
Begin
a[i]:=-10+random(21);
write(a[i]:4);
end; writeln;
pr:=a[2];
a[2]:=a[5];
a[5]:=pr;
For i:=1 to 10 do
write(a[i]:4);
writeln;
end.

Нужно поменять местами

Слайд 17Повторить известные алгоритмы обработки массивов, выучить алгоритм перестановки.

Написать программу решения

задачи
Задать массив, состоящий из 20 целых чисел. Поменять местами 3-й