Добавить материал и получить бесплатное свидетельство о публикации в СМИ
Эл. №ФС77-60625 от 20.01.2015
Инфоурок / Информатика / Презентации / Мен Көшербай Эльвира 08.10.1996 жылы Қызылорда қаласында дүниеге келдім.Қазіргіі уақытта М.Мәметова атындағы гуманитарлық колледжде Физика математика және информатика бөлімінің И-И-12 тобының 4 курс студентімін.Менің мамандығым негізгі орта білім информат
ВНИМАНИЮ ВСЕХ УЧИТЕЛЕЙ: согласно Федеральному закону № 313-ФЗ все педагоги должны пройти обучение навыкам оказания первой помощи.

Дистанционный курс "Оказание первой помощи детям и взрослым" от проекта "Инфоурок" даёт Вам возможность привести свои знания в соответствие с требованиями закона и получить удостоверение о повышении квалификации установленного образца (180 часов). Начало обучения новой группы: 26 апреля.

Подать заявку на курс
  • Информатика

Мен Көшербай Эльвира 08.10.1996 жылы Қызылорда қаласында дүниеге келдім.Қазіргіі уақытта М.Мәметова атындағы гуманитарлық колледжде Физика математика және информатика бөлімінің И-И-12 тобының 4 курс студентімін.Менің мамандығым негізгі орта білім информат

библиотека
материалов
Бірөлшемді массив элементтеріне программа құру
8 3 4 9 11 5 7 10 1 2 12 6 13 Л о т о
8 3 4 9 11 5 7 10 1 2 12 6 13 Л о т о
8 3 4 9 11 5 7 10 1 2 12 6 13 Л о т о
8 3 4 9 11 5 7 10 1 2 12 6 13 Л о т о
8 3 4 9 11 5 7 10 2 12 6 1 13 Л о т о
8 3 4 9 11 5 7 10 2 12 6 1 13 Л о т о
8 3 4 9 11 5 7 10 2 12 6 13 1 Л о т о
8 3 4 9 11 5 7 10 2 12 6 13 1 Л о т о
3 4 9 11 5 7 10 2 12 6 8 13 1 Л о т о
3 4 9 11 5 7 10 2 12 6 13 1 8 Л о т о
3 4 9 11 5 7 10 2 12 6 13 1 8 Л о т о
3 4 9 5 7 10 2 12 6 13 1 8 11 Л о т о
3 4 9 5 7 10 2 12 6 13 1 8 11 Л о т о
3 4 9 5 7 10 2 12 6 13 1 8 11 Л о т о
3 9 5 7 10 2 12 6 13 1 8 11 4 Л о т о
3 9 5 7 10 2 12 6 13 1 8 11 4 Л о т о
Listbox компонентінін List қасиеті
Бірөлшемді массивтін жазылу форматы
Қосындылардың бастапқы мәні нешеге тең
Listbox компонентінін Additem әдісі
Step операторының атқаратын қызметі
Үзінділер
Келесі программаның үзіндісі нені анықтайды s = 0 For k=1 to n s= s+a(k) Next k
Келесі программаның үзіндісі нені анықтайды s = 1 For k=2 to n step 2 s= s *...
Келесі программаның үзіндісі нені анықтайды s = 0 For k=1 to n If a(k) mod 2...
Private Sub Command1_Click() Dim a(8) As Integer For i = 1 To 8 a(i) = InputB...
11 12 13 14 14 15 16 17 18 Dim A(8) as integer 1 2 3 4 5 6 7 8 For i = 5 To 7...
Private Sub Command1_Click() Dim a(8) As Integer For i = 1 To 8 a(i) = InputB...
Private Sub Command1_Click() Dim a(8) As Integer For i = 1 To 8 a(i) = InputB...
21 22 23 24 26 27 28 29 Dim A(8) as integer 1 2 3 4 5 6 7 8 25 For i = 8 To 6...
Private Sub Command1_Click() Dim a(8) As Integer For i = 1 To 8 a(i) = InputB...
Private Sub Command1_Click() Dim a(6) As Integer For i = 1 To 6 a(i) = InputB...
24 43 12 31 -26 27 Dim A(6) as integer 1 2 3 4 5 6 Min = a(1) If a(i) < Min T...
Private Sub Command1_Click() Dim a(6) As Integer For i = 1 To 6 a(i) = InputB...
35 1

"Инфоурок" приглашает всех педагогов и детей к участию в самой массовой интернет-олимпиаде «Весна 2017» с рекордно низкой оплатой за одного ученика - всего 45 рублей

В олимпиадах "Инфоурок" лучшие условия для учителей и учеников:

1. невероятно низкий размер орг.взноса — всего 58 рублей, из которых 13 рублей остаётся учителю на компенсацию расходов;
2. подходящие по сложности для большинства учеников задания;
3. призовой фонд 1.000.000 рублей для самых активных учителей;
4. официальные наградные документы для учителей бесплатно(от организатора - ООО "Инфоурок" - имеющего образовательную лицензию и свидетельство СМИ) - при участии от 10 учеников
5. бесплатный доступ ко всем видеоурокам проекта "Инфоурок";
6. легко подать заявку, не нужно отправлять ответы в бумажном виде;
7. родителям всех учеников - благодарственные письма от «Инфоурок».
и многое другое...

Подайте заявку сейчас - https://infourok.ru/konkurs

Описание презентации по отдельным слайдам:

№ слайда 1 Бірөлшемді массив элементтеріне программа құру
Описание слайда:

Бірөлшемді массив элементтеріне программа құру

№ слайда 2 8 3 4 9 11 5 7 10 1 2 12 6 13 Л о т о
Описание слайда:

8 3 4 9 11 5 7 10 1 2 12 6 13 Л о т о

№ слайда 3 8 3 4 9 11 5 7 10 1 2 12 6 13 Л о т о
Описание слайда:

8 3 4 9 11 5 7 10 1 2 12 6 13 Л о т о

№ слайда 4 8 3 4 9 11 5 7 10 1 2 12 6 13 Л о т о
Описание слайда:

8 3 4 9 11 5 7 10 1 2 12 6 13 Л о т о

№ слайда 5 8 3 4 9 11 5 7 10 1 2 12 6 13 Л о т о
Описание слайда:

8 3 4 9 11 5 7 10 1 2 12 6 13 Л о т о

№ слайда 6 8 3 4 9 11 5 7 10 2 12 6 1 13 Л о т о
Описание слайда:

8 3 4 9 11 5 7 10 2 12 6 1 13 Л о т о

№ слайда 7 8 3 4 9 11 5 7 10 2 12 6 1 13 Л о т о
Описание слайда:

8 3 4 9 11 5 7 10 2 12 6 1 13 Л о т о

№ слайда 8 8 3 4 9 11 5 7 10 2 12 6 13 1 Л о т о
Описание слайда:

8 3 4 9 11 5 7 10 2 12 6 13 1 Л о т о

№ слайда 9 8 3 4 9 11 5 7 10 2 12 6 13 1 Л о т о
Описание слайда:

8 3 4 9 11 5 7 10 2 12 6 13 1 Л о т о

№ слайда 10 3 4 9 11 5 7 10 2 12 6 8 13 1 Л о т о
Описание слайда:

3 4 9 11 5 7 10 2 12 6 8 13 1 Л о т о

№ слайда 11 3 4 9 11 5 7 10 2 12 6 13 1 8 Л о т о
Описание слайда:

3 4 9 11 5 7 10 2 12 6 13 1 8 Л о т о

№ слайда 12 3 4 9 11 5 7 10 2 12 6 13 1 8 Л о т о
Описание слайда:

3 4 9 11 5 7 10 2 12 6 13 1 8 Л о т о

№ слайда 13 3 4 9 5 7 10 2 12 6 13 1 8 11 Л о т о
Описание слайда:

3 4 9 5 7 10 2 12 6 13 1 8 11 Л о т о

№ слайда 14 3 4 9 5 7 10 2 12 6 13 1 8 11 Л о т о
Описание слайда:

3 4 9 5 7 10 2 12 6 13 1 8 11 Л о т о

№ слайда 15 3 4 9 5 7 10 2 12 6 13 1 8 11 Л о т о
Описание слайда:

3 4 9 5 7 10 2 12 6 13 1 8 11 Л о т о

№ слайда 16 3 9 5 7 10 2 12 6 13 1 8 11 4 Л о т о
Описание слайда:

3 9 5 7 10 2 12 6 13 1 8 11 4 Л о т о

№ слайда 17 3 9 5 7 10 2 12 6 13 1 8 11 4 Л о т о
Описание слайда:

3 9 5 7 10 2 12 6 13 1 8 11 4 Л о т о

№ слайда 18 Listbox компонентінін List қасиеті
Описание слайда:

Listbox компонентінін List қасиеті

№ слайда 19 Бірөлшемді массивтін жазылу форматы
Описание слайда:

Бірөлшемді массивтін жазылу форматы

№ слайда 20 Қосындылардың бастапқы мәні нешеге тең
Описание слайда:

Қосындылардың бастапқы мәні нешеге тең

№ слайда 21 Listbox компонентінін Additem әдісі
Описание слайда:

Listbox компонентінін Additem әдісі

№ слайда 22 Step операторының атқаратын қызметі
Описание слайда:

Step операторының атқаратын қызметі

№ слайда 23 Үзінділер
Описание слайда:

Үзінділер

№ слайда 24 Келесі программаның үзіндісі нені анықтайды s = 0 For k=1 to n s= s+a(k) Next k
Описание слайда:

Келесі программаның үзіндісі нені анықтайды s = 0 For k=1 to n s= s+a(k) Next k

№ слайда 25 Келесі программаның үзіндісі нені анықтайды s = 1 For k=2 to n step 2 s= s *
Описание слайда:

Келесі программаның үзіндісі нені анықтайды s = 1 For k=2 to n step 2 s= s * a(k) Next k

№ слайда 26 Келесі программаның үзіндісі нені анықтайды s = 0 For k=1 to n If a(k) mod 2
Описание слайда:

Келесі программаның үзіндісі нені анықтайды s = 0 For k=1 to n If a(k) mod 2 = 0 then s= s + 1 Next k

№ слайда 27 Private Sub Command1_Click() Dim a(8) As Integer For i = 1 To 8 a(i) = InputB
Описание слайда:

Private Sub Command1_Click() Dim a(8) As Integer For i = 1 To 8 a(i) = InputBox("") Next For i = 5 To 7 a(i) = a(i + 1) Next a(8) = 18 For i = 1 To 8 List1.AddItem a(i) Next End Sub Массивтен бір элементті жою

№ слайда 28 11 12 13 14 14 15 16 17 18 Dim A(8) as integer 1 2 3 4 5 6 7 8 For i = 5 To 7
Описание слайда:

11 12 13 14 14 15 16 17 18 Dim A(8) as integer 1 2 3 4 5 6 7 8 For i = 5 To 7 a(i) = a(i + 1) a(8) = 18

№ слайда 29 Private Sub Command1_Click() Dim a(8) As Integer For i = 1 To 8 a(i) = InputB
Описание слайда:

Private Sub Command1_Click() Dim a(8) As Integer For i = 1 To 8 a(i) = InputBox("") Next For i = 5 To 7 a(i) = a(i + 1) Next a(8) = 18 For i = 1 To 8 List1.AddItem a(i) Next End Sub Массивтен бір элементті жою

№ слайда 30 Private Sub Command1_Click() Dim a(8) As Integer For i = 1 To 8 a(i) = InputB
Описание слайда:

Private Sub Command1_Click() Dim a(8) As Integer For i = 1 To 8 a(i) = InputBox("") Next For i = 8 To 6 Step -1 a(i) = a(i - 1) Next a(5) = 25 For i = 1 To 8 List1.AddItem a(i) Next End Sub Массивке бір элемент қосу

№ слайда 31 21 22 23 24 26 27 28 29 Dim A(8) as integer 1 2 3 4 5 6 7 8 25 For i = 8 To 6
Описание слайда:

21 22 23 24 26 27 28 29 Dim A(8) as integer 1 2 3 4 5 6 7 8 25 For i = 8 To 6 Step -1 a(5) = 25

№ слайда 32 Private Sub Command1_Click() Dim a(8) As Integer For i = 1 To 8 a(i) = InputB
Описание слайда:

Private Sub Command1_Click() Dim a(8) As Integer For i = 1 To 8 a(i) = InputBox("") Next For i = 8 To 6 Step -1 a(i) = a(i - 1) Next a(5) = 25 For i = 1 To 8 List1.AddItem a(i) Next End Sub Массивке бір элемент қосу

№ слайда 33 Private Sub Command1_Click() Dim a(6) As Integer For i = 1 To 6 a(i) = InputB
Описание слайда:

Private Sub Command1_Click() Dim a(6) As Integer For i = 1 To 6 a(i) = InputBox("") Next Min = a(1) For i = 1 To 6 If a(i) < Min Then Min = a(i) Next For i = 1 To 6 List1.AddItem a(i) Next MsgBox "Min=" + Str(Min) End Sub Массивтің ең кіші элементін анықтау

№ слайда 34 24 43 12 31 -26 27 Dim A(6) as integer 1 2 3 4 5 6 Min = a(1) If a(i) &lt; Min T
Описание слайда:

24 43 12 31 -26 27 Dim A(6) as integer 1 2 3 4 5 6 Min = a(1) If a(i) < Min Then Min = a(i) < > Min = a(3) < > < Min = a(5) Min = -26

№ слайда 35 Private Sub Command1_Click() Dim a(6) As Integer For i = 1 To 6 a(i) = InputB
Описание слайда:

Private Sub Command1_Click() Dim a(6) As Integer For i = 1 To 6 a(i) = InputBox("") Next Min = a(1) For i = 1 To 6 If a(i) < Min Then Min = a(i) Next For i = 1 To 6 List1.AddItem a(i) Next MsgBox "Min=" + Str(Min) End Sub Массивтің ең кіші элементін анықтау

Автор
Дата добавления 09.03.2016
Раздел Информатика
Подраздел Презентации
Просмотров65
Номер материала ДВ-512159
Получить свидетельство о публикации

"Инфоурок" приглашает всех педагогов и детей к участию в самой массовой интернет-олимпиаде «Весна 2017» с рекордно низкой оплатой за одного ученика - всего 45 рублей

В олимпиадах "Инфоурок" лучшие условия для учителей и учеников:

1. невероятно низкий размер орг.взноса — всего 58 рублей, из которых 13 рублей остаётся учителю на компенсацию расходов;
2. подходящие по сложности для большинства учеников задания;
3. призовой фонд 1.000.000 рублей для самых активных учителей;
4. официальные наградные документы для учителей бесплатно(от организатора - ООО "Инфоурок" - имеющего образовательную лицензию и свидетельство СМИ) - при участии от 10 учеников
5. бесплатный доступ ко всем видеоурокам проекта "Инфоурок";
6. легко подать заявку, не нужно отправлять ответы в бумажном виде;
7. родителям всех учеников - благодарственные письма от «Инфоурок».
и многое другое...

Подайте заявку сейчас - https://infourok.ru/konkurs


Выберите специальность, которую Вы хотите получить:

Обучение проходит дистанционно на сайте проекта "Инфоурок".
По итогам обучения слушателям выдаются печатные дипломы установленного образца.

ПЕРЕЙТИ В КАТАЛОГ КУРСОВ


Идёт приём заявок на международный конкурс по математике "Весенний марафон" для учеников 1-11 классов и дошкольников

Уникальность конкурса в преимуществах для учителей и учеников:

1. Задания подходят для учеников с любым уровнем знаний;
2. Бесплатные наградные документы для учителей;
3. Невероятно низкий орг.взнос - всего 38 рублей;
4. Публикация рейтинга классов по итогам конкурса;
и многое другое...

Подайте заявку сейчас - https://urokimatematiki.ru

Похожие материалы

Включите уведомления прямо сейчас и мы сразу сообщим Вам о важных новостях. Не волнуйтесь, мы будем отправлять только самое главное.
Специальное предложение
Вверх