№ 2 зертханалық жұмыс
Қайталау операторлары.
Жұмыстың мақсаты: алгоритмдердің циклдік құрылымдарын программалауды үйрену.
WHILE <шарт> DO <циклдің денесі>
ӘЗІРШЕ <шарт> ОРЫНДАУ <циклдің денесі>
WHILE, DO –түйінді сөздер.
Цикл денесін әрбір қайталау алдында <шарт> тексеріледі. Егер <шарт> TRUE (шындық) болған жағдайда <цикл денесі> орындалады және цикл қайталанады. Егер <шарт> алғаш тексерілгенде FALSE (жалған) болса, онда <цикл денесі> біррет те орындалмастан программа цикл соңына шығады.
REPEAT
<циклдің денесі>
UNTIL <шарт>;
ҚАЙТАЛАУ <циклдің денесі> ДЕЙІН <шарт>
<циклдің денесі> ең болмағанда бір рет орындалып, одан кейін <шарт> қойылады, егер мәні FALSE (жалған) болса, онда <цикл денесі> қайталанады, ал кері жағдайда цикл өз жұмысын тоқтатады.
Жұмысты орындау мысалы: Келесі алгоритмді іске асыратын программаны құру керек. Қосындыны есептеуді берілген e = 10-6 дәлдігімен есептеу программасын құрыңыз. Егер қосындының модулі дәлдіктен кіші болған жағдайда талап етілетін дәлдікке жеттік деп есептеңіз.
Келесі қосындыны есептеңіз:
Программа тексті:
PROGRAM PRSUM;
VAR X, S : REAL; K : INTEGER;
BEGIN
WRITELN(‘Ввод X и e’);
READ(X, e);
S:=0; K:=1;
REPEAT
S:=S+(sqr(X)+1)/(sqr(sqr(K))+K*sqrt(abs(sqr(X)*X+1))+1);
K:=K+1;
UNTIL ABS(AK) < e;
WRITELN(‘S = ’, S:7:3)
END.
№ 5 зертханалық жұмысқа тапсырма
Алгоритмнің блок-схемасын құру керек және берілген n натурал саны мен х нақты саны үшін берілген есепке программа жазу керек. Есептеу үшін параметрлік цикл қолданылады.
Тапсырмалар нұсқалары:
1. 2.
3. 4.
5. 6.
7. 8.
9. 10..