Бейсик тілінде берілген есепке программа құру туралы ақпарат

Пән: Информатика, Программалау, Мәліметтер қоры
Жұмыс түрі: Курстық жұмыс
Тегін: Антиплагиат
Көлемі: 21 бет
Таңдаулыға:

КУРСТЫҚ ЖҰМЫС
Тақырыбы: Бейсик тілінде берілген есепке программа құру

Мазмұны
Кіріспе ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... 3
... ... ... ... ... ... ... ... .. ... ... ... ..
1.1. Есептің математикалық түрдегі 4
жазылуы ... ... ... ... ... ... ... ... ... ... ...
1.2. Есесптің 5
шығарылуы ... ... ... ... ... ... . ... ... ... ... ... ... ... ...
... ... ... ... ...
1.3. 6
Алгоритм ... ... ... ... ... ... .. ... ... ... ... ... ... ... ...
... ... ... ... ... ... ... ... .. ...
1.4. Алгоритмнің графикалық кескіні 7
(блок-схема) ... ... ... ... ... .. ... ... ...
1.5. Программаның тексті 8
(листинг) ... ... ... ... ... ... . ... ... ... ... ... ... ... ...
.
1.6. Программаның бастапқы 9
берілгендері ... ... ... ... ... .. ... ... ... ... ... ... .
1.7. Программаның шығарылған 10
нәтижесі ... ... ... ... ... ... .. ... ... ... ... ... .
2.1. Есептің математикалық түрдегі 11
жазылуы ... ... ... ... ... ... ... ... ... ... ...
2.2. Есесптің 12
шығарылуы ... ... ... ... ... ... . ... ... ... ... ... ... ... ...
... ... ... ... ...
2.3. 13
Алгоритм ... ... ... ... ... ... .. ... ... ... ... ... ... ... ...
... ... ... ... ... ... ... ... .. ...
2.4. Алгоритмнің графикалық кескіні 14
(блок-схема) ... ... ... ... ... .. ... ... ...
2.5. Программаның тексті 15
(листинг) ... ... ... ... ... ... . ... ... ... ... ... ... ... ...
.
2.6. Программаның бастапқы 18
берілгендері ... ... ... ... ... .. ... ... ... ... ... ... .
2.7. Программаның шығарылған 19
нәтижесі ... ... ... ... ... ... .. ... ... ... ... ... .
Қорытынды 20
Әдебиеттер тізімі 21

Кіріспе
Қазіргі кезде кеңінен қолданылатын программалау жүйесінің бірі – Basic.
Бастапқыда Basic тілі программалауды алғаш үйренушілір үшін өте тиімді
құрал болып табылады. Бил Гейтс көмегімен Basic тілі қазіргі заман талабына
сай, қуатты программалау жүйесіне айналды. Basic – жоғарғы денгейлі
программалау жүйесі. Оның логикалық құрылымы әр түрлі есептерді дәл шешуге
комегін тигізеді. Сондықтан, оқушылар мен студенттерге программалаудың
негізін Basic тілін оқытып-үйретуден бастап, программалаудың қыр-сырын
меңгертудің маңызы зор.

1. Есесптің математикалық түрінде жазылуы
Ax2+Bx+C=0 квадраттық теңдеу болып келеді. Оны шешудің негізгі
формуласы:
D=B2-4AC – дискриминантты анықтаймыз
Егер D 0-ден үлкен болса онда екі түбірі болады
- бірінші түбір
- екінші түбір
Егер D 0-ге тең болса онда бір түбірі болады

Егер D 0-ден кіші болса онда теңдеудің шешімі жоқ
2. Есесптің шығарылуы
А) A=4, B=2, C=-5 мәндері берілсін
Дискриминант 0-ден үлкен онда екі түбірі болады

В) A=2, B=4, C=2 мәндері берілсін
Дискриминант 0-ге тең онда бір түбірі болады

С) A=6, B=3, C=1 мәндері берілсін
Дискриминант 0-ден кіші онда түбірі жоқ болады
3. Алгоритм
1. Программаның басы
2. А, В, С айнымалыларға пернетақтадан мән береміз
3. Дискрименантты есептейміз және баспаға шығарамыз
4. Егер дискрименант 0-ден үлкен болса онда екі түбірін есептеп баспаға
шығарамыз
5. Егер дискрименант 0-ге гең болса онда бір түбірін есептеп баспаға
шығарамыз
6. Егер дискрименант 0-ден кіші болса онда экран бетіне “Нет решения” деген
хабарламаны шығарамыз
7. Программаның соңы

4. Алгоритмнің графикалық кескіні (блок-схема)
ё

5. Программаның тексті (листинг)
10 REM
15 CLS
20 PRINT "A=";
30 INPUT A
40 PRINT "B=";
50 INPUT B
60 PRINT "C=";
70 INPUT C
90 D = B ^ 2 - 4 * A * C
95 PRINT "Дискрименант D="; D
100 IF D 0 THEN
105 PRINT “Решение имеет два корня“
110 X1 = (-B + SQR(D)) (2 * A)
120 X2 = (-B - SQR(D)) (2 * A)
130 PRINT "X1="; X1
140 PRINT "X2="; X2
150 END IF
160 IF D = 0 THEN
165 PRINT "Решение имеет один корень"
170 X12 = -B (2 * A)
180 PRINT "X12="; X12
190 END IF
200 IF D 0 THEN PRINT "”Нет решения
210 END

6. Прграмманың алғашқы берілгендері
А) A=? 4 B=? 2 C=? –5
В) A=? 2 B=? 4 C=? 2
С) С=? 6 B=? 3 C=? 1

7. Программаның шығарылған нәтижесі
А)
Дискриминант D= 84
Дискрименант больше 0 - два корня
X1= .8956439
X2=-1.395644
В)
Дискриминант D= 0
Дискрименант равен 0 - один корень
X12=-1
С)
Дискриминант D=-15
Дискриминант меньше 0 - нет решения

2.1. Есесптің математикалық түрінде жазылуы
Массивтің бас диагональдың жоғарғы жағында орналасқан элементтерді
қарастыру үшін “Егер бағана нөмірі жол нөмірінен үлкен болса” деген шарт
арқылы жүзеге асырамыз.
Массивтің бас диагональдың төменгі жағында орналасқан элементтерді
қарастыру үшін “Егер бағана нөмірі жол нөмірінен кіші болса” деген шарт
арқылы жүзеге асырамыз.
Массивтің ең үлкен элементін анықтау үшін бірінші элементті МАХ
айнымалысына теңестіріп “Егер элемент МАХ-тан үлкен болса онда МАХ-қа сол
элементтің мәнің меншіктейміз” деген алгоритмді пайдаланамыз.
Массивтің ең кіші элементін анықтау үшін бірінші элементті МIN
айнымалысына теңестіріп “Егер элемент МIN -нан кіші болса онда МIN -ға сол
элементтің мәнің меншіктеу” деген алгоритмді пайдаланамыз.
2.2. Есесптің шығарылуы
X( 9 , 12 )
8 6 6 3 4 8 1 8 9
8 1 5 9 8 4 10 9 1
10 4 6 8 1 6 5 3 7
7 3 3 9 9 6 10 10 3
7 10 3 6 2 10 7 1 6
2 2 8 3 1 3 4 4 10
10 5 3 2 2 7 5 5 8
4 7 3 2 6 1 5 10 3
8 4 3 10 7 7 5 1 6
y( 9 , 12 )
7 10 9 1 6 10 5 7 6
6 ... жалғасы

Сіз бұл жұмысты біздің қосымшамыз арқылы толығымен тегін көре аласыз.