Сабақ түрі: практикалық сабақ Құрал-жабдықтар: компьютерлер, карточкалар, презентация, Netop бағдарламасы

1. 
   Ұйымдастыру кезеңі (2 мин):
   

2. 
   Үй тапсырмасын тексеру.(10 мин)
   

1. 
   Символдық мәліметтерді енгізгенде қанша символға дейін енгізуге болады?
   
2. 
   1 символ қанша орын алады?
   
3. 
   Символдық мәліметтер программада қандай типпен белгіленеді?
   

1. 
   Тіркестік мәліметтерді сипаттау үшін қолданылатын тип:
   

2. 
   Бүтін санды қандай тип арқылы сипаттаймыз?
   

3. 
   Pos нені анықтайды?
   

4. 
    Copy функциясы нені анықтайды?
   

5. 
   Upcase(ch) - Функциясы нені орындайды?
   

6. 
    Мәтін ұзындығын анықтайтын операциясы –?
   

7. 
   Concat(s1, s2,…,sn) операциясы нені орындайды?
   

8. 
   Жолдық типті хабарлайды:
   

9. 
    Delete(S,Poz,N)операциясы нені орындайды?
   

10. 
     Insert(S1,S2,Poz) –операциясы нені орындайды?
    

№1

a:=’Қазақшаңыз’

b:=’қалай?’

a) d:=a+b

ә) copy(a,2,1)+copy(a,8,3)

a:=’Жандауа’

a) length(a)

ә) copy(a,2,1)+copy(a,6,2)

№3

a:=’Дудар - ай’

а) pos(‘р’,a)

ә) copy(a,7,2)+copy(a,3,3)

Нәтижесі қандай?(5, айдар)

№4

y:=’Айбын’

а) copy(y,5,1)+copy(y,1,1)+copy(y,5,1)

№5

b:=’Сөз мерген’

а) length(b)

ә) copy(b,3,1)+copy(b,6,4)+copy(b,7,1)

Нәтижесі қандай?(10, зергер)

№6

a:=’Ерке’

b:=’тай’

ә) pos(‘a’,b)

№7

d:=’Толағай’

а) pos(‘ғ’,d)

а) length(с)

ә) copy(с,5,1)+copy(с,4,1)+copy(с,6,2)

Нәтижесі қандай?(10, ромб)


4) Практикалық тапсырмаларды орындау (25 мин)
Тапсырма №1.
Программа конкатенация көмегімен (жапсыру) бірнеше сөзден бір сөз құрайды. Қателерді дұрыстаңдар. Қазақша жазылған сөздердің орнына ағылшынша керекті операторларды жазыңдар.

Программаның тақырыбы esep_1; Сипаттау бөлімі S,R,H : String; бастау cls; шығару ('1-ші сөзді енгізіңіз'); енгізу (R); шығару ('2-ші сөзді енгізіңіз'); енгізу (H); S:=R+H; шығару ('Жаңа сөз ',S); программаның соңы.

Тапсырма №2.
Кіші әріптерді үлкен әріптерге ауыстыру программасын құру.
Мына сөзді өзгертіңдер:

сызғыш

сызҒЫШ

program esep_2;

var s:STRING; i:integer;

begin

cls;

writeln ('сөзді енгізіңіз');

readln (s);

FOR i := 4 TO 6 DO

s[i] := UpCase (s[i]);

writeln(s);

end.
Тапсырма №3.
Қиып алу және жалғастыру операцияларының көмегімен «мұқияттылық» сөзінің бөліктерінен «ұяттылық», «мықты», «ықылық», «қияқ» сөздерін құрастырыңдар.

PROGRAM esep_3;

VAR s: STRING[30]; s1, s2, s3, s4: STRING[20];

BEGIN

s := 'мұқияттылық';

WriteLn(s);

s1 := Copy(s,2,1)+Copy(s,5,7);

WriteLn(s1);

s2 := Copy(s,1,1)+copy(s,8,1)+copy(s,3,1)+copy(s,6,1)+copy(s,8,1);

WriteLn(s2);

s3 := Copy(s,8,1)+Copy(s,3,1)+Copy(s,8,4);

WriteLn(s3);

s4 := Copy(s,3,2)+Copy(s,5,1)+Copy(s,3,1);

WriteLn(s4);

END.

var a: string; y:integer;

begin

Cls;

Writeln(a);

y:=pos('s',a);

writeln(y);

1. 
   Тіркестік айнымалының ұзындығы қалай анықталады?
   
2. 
   Тіркестік айнымалылар мен тұрақтыларға қандай операциялар қолданылады?
   
3. 
   Тіркестің кіші символдарын үлкен символдарға қалай ауыстырады?