🗊Презентация Массивы. Одномерные массивы

Категория: Устройства и комплектующие
Нажмите для полного просмотра!
Массивы. Одномерные массивы, слайд №1Массивы. Одномерные массивы, слайд №2Массивы. Одномерные массивы, слайд №3Массивы. Одномерные массивы, слайд №4Массивы. Одномерные массивы, слайд №5Массивы. Одномерные массивы, слайд №6Массивы. Одномерные массивы, слайд №7Массивы. Одномерные массивы, слайд №8Массивы. Одномерные массивы, слайд №9Массивы. Одномерные массивы, слайд №10Массивы. Одномерные массивы, слайд №11Массивы. Одномерные массивы, слайд №12Массивы. Одномерные массивы, слайд №13Массивы. Одномерные массивы, слайд №14Массивы. Одномерные массивы, слайд №15Массивы. Одномерные массивы, слайд №16Массивы. Одномерные массивы, слайд №17Массивы. Одномерные массивы, слайд №18Массивы. Одномерные массивы, слайд №19
Скачать
Вы можете ознакомиться и скачать презентацию на тему Массивы. Одномерные массивы. Доклад-сообщение содержит 19 слайдов. Презентации для любого класса можно скачать бесплатно. Если материал и наш сайт презентаций Mypresentation Вам понравились – поделитесь им с друзьями с помощью социальных кнопок и добавьте в закладки в своем браузере.

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

Слайд 1


Массивы. Одномерные массивы, слайд №1
Описание слайда:

Слайд 2


Массивы. Одномерные массивы, слайд №2
Описание слайда:

Слайд 3


Массивы. Одномерные массивы, слайд №3
Описание слайда:

Слайд 4


Массивы. Одномерные массивы, слайд №4
Описание слайда:

Слайд 5


Массивы. Одномерные массивы, слайд №5
Описание слайда:

Слайд 6


Массивы. Одномерные массивы, слайд №6
Описание слайда:

Слайд 7


Массивы. Одномерные массивы, слайд №7
Описание слайда:

Слайд 8


Массивы. Одномерные массивы, слайд №8
Описание слайда:

Слайд 9


Печать линейного массива.
Описание слайда:
Печать линейного массива.

Слайд 10


Массивы. Одномерные массивы, слайд №10
Описание слайда:

Слайд 11


План программы для работы с массивами.
Описание слайда:
План программы для работы с массивами.

Слайд 12


Массивы. Одномерные массивы, слайд №12
Описание слайда:

Слайд 13


Массивы. Одномерные массивы, слайд №13
Описание слайда:

Слайд 14


Пример 1 В одномерном массиве посчитать сумму положительных элементов program sum; uses crt; var a:array[1..10] of integer; i,n,s:integer; begin clrscr; write('Введите число элементов'); read(n); for i:=1 to n do read(a[i]); for i:=1 to n do begin write(a[i]:4); if a[i]>0 then s:=s+a[i]; end; gotoxy(5,10); {вывод в позиция экрана для ТР} write('s= ',s); end.
Описание слайда:
Пример 1 В одномерном массиве посчитать сумму положительных элементов program sum; uses crt; var a:array[1..10] of integer; i,n,s:integer; begin clrscr; write('Введите число элементов'); read(n); for i:=1 to n do read(a[i]); for i:=1 to n do begin write(a[i]:4); if a[i]>0 then s:=s+a[i]; end; gotoxy(5,10); {вывод в позиция экрана для ТР} write('s= ',s); end.

Слайд 15


Пример 2 В одномерном массиве вычислить минимальный элемент program minimum; uses crt; var a:array[1..10] of integer; i,n,min:integer; begin clrscr; write('Введите число элементов'); read(n); for i:=1 to n do read(a[i]); writeln; for i:=1 to n do write(a[i]:4); min:=a[1]; for i:=2 to n do if a[i]<min then min:=a[i]; writeln; write('Мин. элемент= ',min); end.
Описание слайда:
Пример 2 В одномерном массиве вычислить минимальный элемент program minimum; uses crt; var a:array[1..10] of integer; i,n,min:integer; begin clrscr; write('Введите число элементов'); read(n); for i:=1 to n do read(a[i]); writeln; for i:=1 to n do write(a[i]:4); min:=a[1]; for i:=2 to n do if a[i]<min then min:=a[i]; writeln; write('Мин. элемент= ',min); end.

Слайд 16


Пример 3 Дан массив целых чисел. Записать его наоборот program massiv; uses crt; var a:array[1..10] of integer;{описание массива} i,n:integer; begin clrscr; randomize; {генератор случайных чисел} write('Введите число элементов'); read(n); for i:=1 to n do begin a[i]:=random(10); {заполнение массива} write(a[i]:4); {вывод массива} end; writeln;{переход на след. строку} for i:=n downto 1 do write(a[i]:4); {вывод массива наоборот} end.
Описание слайда:
Пример 3 Дан массив целых чисел. Записать его наоборот program massiv; uses crt; var a:array[1..10] of integer;{описание массива} i,n:integer; begin clrscr; randomize; {генератор случайных чисел} write('Введите число элементов'); read(n); for i:=1 to n do begin a[i]:=random(10); {заполнение массива} write(a[i]:4); {вывод массива} end; writeln;{переход на след. строку} for i:=n downto 1 do write(a[i]:4); {вывод массива наоборот} end.

Слайд 17


Пример 4 Определить, сколько пар одинаковых соседних элементов содержится в массиве. program massiv; uses crt; var a:array[1..10] of integer;{описание массива} i,n,s:integer; begin clrscr; randomize; {генератор случайных чисел} write('Введите число элементов'); read(n); for i:=1 to n do begin a[i]:=random(10); {заполнение массива} write(a[i]:4); {вывод массива} end; writeln;{переход на след. строку} for i:=1 to n do if a[i]=a[i+1] then s:=s+1; write('s=',s); {вывод массива наоборот} end.
Описание слайда:
Пример 4 Определить, сколько пар одинаковых соседних элементов содержится в массиве. program massiv; uses crt; var a:array[1..10] of integer;{описание массива} i,n,s:integer; begin clrscr; randomize; {генератор случайных чисел} write('Введите число элементов'); read(n); for i:=1 to n do begin a[i]:=random(10); {заполнение массива} write(a[i]:4); {вывод массива} end; writeln;{переход на след. строку} for i:=1 to n do if a[i]=a[i+1] then s:=s+1; write('s=',s); {вывод массива наоборот} end.

Слайд 18


Пример 5 В одномерном массиве заменить все нулевые элементы на 10 program massiv; uses crt; var a:array[1..10] of integer;{описание массива} i,n,s:integer; begin clrscr; randomize; {генератор случайных чисел} write('Введите число элементов'); read(n); for i:=1 to n do begin a[i]:=random(10); {заполнение массива} write(a[i]:4); {вывод массива} end; writeln;{переход на след. строку} for i:=1 to n do begin if a[i]=0 then a[i]:=10; write(a[i]:4); {вывод массива наоборот} end; end.
Описание слайда:
Пример 5 В одномерном массиве заменить все нулевые элементы на 10 program massiv; uses crt; var a:array[1..10] of integer;{описание массива} i,n,s:integer; begin clrscr; randomize; {генератор случайных чисел} write('Введите число элементов'); read(n); for i:=1 to n do begin a[i]:=random(10); {заполнение массива} write(a[i]:4); {вывод массива} end; writeln;{переход на след. строку} for i:=1 to n do begin if a[i]=0 then a[i]:=10; write(a[i]:4); {вывод массива наоборот} end; end.

Слайд 19


Самостоятельно: В одномерном массиве найти разность наибольшего и наименьшего элементов. Дан одномерный массив. Вывести на экран числа > 5. В одномерном массиве найти произведение ненулевых элементов.
Описание слайда:
Самостоятельно: В одномерном массиве найти разность наибольшего и наименьшего элементов. Дан одномерный массив. Вывести на экран числа > 5. В одномерном массиве найти произведение ненулевых элементов.

Скачать

Похожие презентации
Mypresentation.ru
Загрузить презентацию