Dasturlash asoslari



Yüklə 5,61 Mb.
səhifə111/111
tarix19.12.2023
ölçüsü5,61 Mb.
#152992
1   ...   103   104   105   106   107   108   109   110   111
Dasturlash asoslari

Ob’yekt

Xossasi

O‘rnatilgan qiymatlari

Form1

Caption

Sharti oldinda berilgan sikl

Label1

Caption

Nuqtalar soni

Label2

Caption

Halqaga tushishlar soni

Command1

Caption

Ishga tushirish

Command2

Caption

Dasturdan chiqish

Text1, Text2

Text

Text xossasi maydonini tozalash




11.38-rasm


Blok-sxemasi


Dastur kodi

Option Explicit


Private Sub Command1_Click()
Dim K1, K2 As Integer
Dim X, Y, D As Single
K1 = 0
K2 = 0
Do While (K1 <= 300) And (K2 <= 50)
X = 2# * Rnd - 1#
Y = 2# * Rnd - 1#
K1 = K1 + 1
D = X * X + Y * Y
If (D > 0.25) And (D < 1#) Then K2 = K2 + 1
Loop
Text1.Text = Str(K1)
Text2.Text = Str(K2)
End Sub

Private Sub Command2_Click()


End
End Sub

Private Sub Form_Load()


Randomize
End Sub



87

51

11.39-rasm




17-misol: Shartli sikllarningtuzilmasini ishlatish

(sikl tanasi bajarilganidan so‘ng shartni tekshirish)


Tasodif sonlar datchigi yordamida 0 dan 1000 gacha bo‘lgan oraliqdan butun sonni olish. Urinishlar 950 dan katta bo‘lgan qiymatni olguncha davom etadi. Olingan natijani va urinishlar sonini natijaga chiqarish kerak.


Algoritmi



  1. К – urinishlar soni – siklga kirisgdan oldin unga nol qiymatini berish

  2. Sikl sarlavqasini kiritish

  3. Sikl iteratsiyasi formulasini kiritish

К =К + 1
А =1000*int(Rnd) tasodif sonini aniqlash

  1. Agar А ≤ 950 bo‘lsa, 3-bosqichqa o’tish

  2. А, К larni chiqarish


11.40-rasm



Ob’yekt

Xossa

O‘rnatilgan qiymatlari

Form1

Caption

Sharti oxirida berilgan sikl

Label1

Caption

Tasodifiy son

Label2

Caption

Urinishlar soni

Command1

Caption

Ishga tushirish

Command2

Caption

Chiqish

Text1, Text2

Text

Text xossasi maydonini tozalash


11.41-rasm


Blok-sxemasi


Dastur kodi
Option Explicit
Private Sub Command1_Click()
Dim K, A As Integer
K = 0
Do
K = K + 1
A = Int(1000 * Rnd)
Loop While A <= 950
Text1.Text = Str(A)
Text2.Text = Str(K)

End Sub

Private Sub Command2_Click()
End
End Sub

Private Sub Form_Load()


Randomize
End Sub



965

11.42-rasm

11 –bobga oid savollar


1)Vizual Basicda izohlar qanday tashkil qilinadi?
2)Operatorlarni bir nechta qatorga joylashtirish qanday tashkil etiladi?
3)Bir nechta operatorlarni bir qatorga joylashtirish qanday tashkil etiladi?
4)Kodni tahrirlash nima?
5)Chiziqli algoritm va ularning dasturlari.
6)If, Go to, Select boshqaruvchi tuzilmalarni tushuntirib bering.
7)Select Case shartli operatori va uni ishatish.
8)Siklli tugmalarni tushuntirib bering.
9)For ... Next sikl operatori va uni ishlatishni tushuntirib bering.
10)Sharti oldinda berilgan sikl operatori sintaksisini va ishlatilishini tushuntirib bering.
11)Sharti oxirida berilgan sikl operatori sintaksisini va ishlatilishini tushuntirib bering.


Foydalanilgan adabiyotlar ro‘yxati





  1. Бухер, Патрик, «Programmiersprachen» (Языки программирования), статья на сайте www.it-academy.cc, 10/2004

  2. Бухер, Патрик, «Der Bubble-Sort Algorithmus», статья на сайте www.it-academy.cc, 11/2004

  3. Бёме, д-р. P., «Programmiersprachen C/C++» (Язык прогаммирования C/C++), конспект лекций Института информатики Университета им. Мартина-Лютера, Халле-Виттенберг, 1996

  4. Блессманн, Бюттнер, Дакс, «Anwendungsentwicklung» (Программирование), Тройсдорф, 2002

  5. Бройер, Клаус Ульрих и Мюллер, Карлхайнц, «Umsetzungshilfen für neue Prüfungsstruktur der IT-Berufe» (Помощь в реализации новых экзаменационных стректур для ИКТ-профессий), заключительный отчет», Федеральное министерство образования и исследований (ответственный редактор), Бонн, 10/2000

  6. Федеральный институт образования (ответственный редактор), «Erläuterungen und Praxishilfen zur Ausbildungsordnung» (Пояснения и практическая помощь по положению об организации профессиональной подготовки), Берлин, 1998

  7. Штабенов, Хельмут и Тодт, Петер, «Informations- und Telekommunikationstechnik» (Информационная и телекоммуникационная техника), Бад Хомбург, 2001

  8. Михельман, Норберт и Хеттвер, Рольф, «Datenbankentwicklung und –anpassung mit MS Access und SQL» (Разработка баз данных и их адаптация к MS Access и SQL), Тройсдорф, 2001

  9. Михельман, Норберт и Хеттвер, Рольф, «Programmentwicklung mit C/C++ und HTML» (Программирование на C/C++ и HTML), Тройсдорф, 2001

  10. Бойт, Маркус и др., «Fachinformatiker/-in Systemintegration, IT-System-Elektroniker/-in, Prüfungsvorbereitung» (Специалист по информатике, системной интеграции, специалист по электронике ИТ-систем, подготовка к экзамену), Тройсдорф, 2004

  11. Лайтенбергер, Бернд, «Die Entwicklung der Programmiersprachen» (Разработка языков программирования), Интернет-статья, Остфилдерн, 02/2006.

  12. Clemson University, Department of Industrial Engineering, SC, USA, “Flow Charts”, Web- Tutorial, deming.eng.clemson.edu

  13. Wirth, N. (1976). Algorithms + Data Structures = Programs, Prentice-Hall, Englewood Cliffs, N.J. (Русский перевод: Вирт Н. Алгоритмы + структура данных = программы. – М.б ”Мир“ , 1985.)

  14. Федеративная Республика Германия, решение конференции министерства по делам образования, религии и культуры от 25.04.1997, положение об организации профессиональной подготовки специалистов по информатике, ИТ-элетронике и коммерсантов ИТ-систем, опубликовано в федеральном вестнике Nr. 68 от 08.04.1998

  15. Зайчик и др., «Deutsch-Russisches Wörterbuch für EDV-Terminologie» (Немецко-Русский словарь по компютерной терминологии), Гамбург, 1998

  16. Мизинина, Жильцов, Англо-русский и русско-английский словарь компьютерной лексики, Москва, 2004

  17. Брандт, Финн и др, « T@ke IT », ключевые квалификации для ИТ-профессий, Гамбург, 2003

  18. Senator für Bildung und Wissenschaft der Freien und Hansestadt Bremen (Сенатор по вопросам образования и науки свободного ганзейского города Бремен) (издатель), «Rahmenplan IT-Berufe» (Типовой план для ИТ-профессий), Бремен, 2000

  19. Thüringer Kultusministerium (Тюрингское министерство по делам образования, религии и культуры) (издатель), Umsetzung des KMK-Rahmenplans für die Ausbildung zum Fachinformatiker Anwendungsentwicklung, Bad Berka, 2000

  20. Ридлль, Альфред, «Didaktik I Grundlagen» (Дидактика I. Основы) и «Didaktik II Berufliche Bildung» (Дидактика II. Профессиональное образование), конспект лекций Мюнхенского Технического Университета, 2003

  21. Плате, Юрген, «Algorithmen und Datenstrukturen, Programmieren 1» (Алгоритмы и структуры данных, программирование 1), конспект лекций Мюнхенского высшего специальнго учебного заведения, FB 04, январь 2006-03-02

  22. Различные статьи с сайта de.wikipedia.org

  23. Думке, Р., «Algorithmen und Datenstrukturen» (Алгоритмы м структуры данных), и другие конспекту лекций Университета Otto-von-Guericke-Universität, факультет информатики, Магдебург, 06/2005






Yüklə 5,61 Mb.

Dostları ilə paylaş:
1   ...   103   104   105   106   107   108   109   110   111




Verilənlər bazası müəlliflik hüququ ilə müdafiə olunur ©genderi.org 2024
rəhbərliyinə müraciət

    Ana səhifə