#1 слайд
Бір өлшемді жиым Сабақтың тақырыбы :

1 слайд

#2 слайд
Мақсаты :  Білімділігі: Оқушылардың массив жайлы жалпы білімін қалыптастыру.  Тәрбиелігі: Оқушыларды адалдыққа, жауапкершілікке, жүйелікке, ауызбіршілікке тәрбиелеу.  Дамытушылығы: Оқушылардың пәнге деген қызығушылығын арттыру, ой-өрісін дамыту, өз бетінше жұмыс істей алу қабілетін көтеру, тапқырлыққа, ізденімпаздылыққа, шығармашылыққа баулу.Сыни ойлауын дамыту.

2 слайд

#3 слайд
Сабақ барысы : 1. Ұйымдастыру кезеңі 2. Үй тапсырмасын тексеру 3. Жаңа сабақ 4. Практикалық жұмыс 5. Бағалау 6. Қорытынды 7. Үйге тапсырма

3 слайд

#4 слайд
Бағалау парағы:

4 слайд

#5 слайд
2-тапсырма. Program tapsirma2; Var s:string; a:char; I,n:integer; Begin Readln(s); Readln(a); N:=0; For I:=1 to length(n) do If a := s[i] then N:=n+1; Writeln(n); S:=Delete(s,1,(length(s)-1)); Write(s); End. 1-тапсырма. Program tapsirma1; Var s:string; i:intchar; begin write(‘Soilem engiz’); readln(s); for I = length(s) downto 1 do write(s(i)); End. Үй тапсырмасын тексеру : І топБерілген бағдарламадағы қателікті тауып қызметін түсіндіреміз .

5 слайд

#6 слайд
ІІ топ 1-тапсырма. program tapsirma1; var s: string; I,n:real; begin readln(s); N = length(s); for i:=1 to n do if I mod 2 :=0 then write(s[i]); end. 2-тапсырма. Program tapsirma2; Var s1,s2:string; a:char; I,n:integer; Begin Readln(s1); Readln(a); N:=length(s2); For I:=1 to n do If a=s1[i] then S[i]:=!; Writeln(s); copy(s,1,(length(s)-1)); Write(s2); End.

6 слайд

#7 слайд
1-тапсырма. Program tapsirma1; Var s:string; i:intchar; begin write(‘Soilem engiz’); readln(s); for I = length(s) downto 1 do write(s(i)); End. := S[i]Integer;

7 слайд

#8 слайд
2-тапсырма. Program tapsirma2; Var s:string; a:char; I,n:integer; Begin Readln(s); Readln(a); N:=0; For I:=1 to length(n) do If a := s[i] then N:=n+1; Writeln(n); S:=Delete(s,1,(length(s)-1)); Write(s); End. = Length(s) Delete(s,1,(length(s)-1));

8 слайд

#9 слайд
1-тапсырма. program tapsirma1; var s: string; I,n:real; begin readln(s); N = length(s); for i:=1 to n do if I mod 2 :=0 then write(s[i]); end. := =Integer;

9 слайд

#10 слайд
2-тапсырма. Program tapsirma2; Var s1,s2:string; a:char; I,n:integer; Begin Readln(s1); Readln(a); N:=length(s2); For I:=1 to n do If a=s1[i] then S[i]:=!; Writeln(s); copy(s,1,(length(s)-1)); Write(s2); End. s1 ’ !’ ; S2:=copy(s,1,(length(s 1 )-1));

10 слайд

#11 слайд
1- топ 1) Бір өлшемді жиым ұғымы; 2) Бір өлшемді жиымның паскаль тілінде өрнектелуі. 2-топ 3) Жиым элементтерін енгізу; 4) Жиым элементтерін шығару.

11 слайд

#12 слайд
Деңгейлік тапсырмалар: А деңгейі. Бүтін типті бір өлшемді жиым элементтерін автоматты түрде енгізетін программа құрыңыз. В деңгейі. Бүтін типті N ретті массив элементтерінің қосындысын табатын программа құрыңыз. С деңгейі. Бүтін типті N ретті бір өлшемді жиымның ең үлкен элементін табатын программа құрыңыз.

12 слайд

#13 слайд
Бағалау парағы :

13 слайд

#14 слайд
Рефлекция . ( БББ) Білемін Білдім Білгім келеді

14 слайд

#15 слайд
Үйге тапсырма : 119-бет №3,4,5 - есептер

15 слайд

#16 слайд
Назарларыңызға рахмет!!!

16 слайд