Пєн Информатика сынып 9 К‰ні

жүктеу 1,41 Mb.

бет	5/8
Дата	17.11.2017
өлшемі	1,41 Mb.
	#535
түрі	Сабақ

1 2 3 4 5 6 7 8

WriteLn(A =, A:5:3);
Program esep2_3;
6)Сабақты қорытындылау Оқушыларды шартты программалар құрып үйрету. 7) Үйге тапсырма

Else A:= 3* sqrt(x+1);

{әйтпесе (х>-1 болса), А= функциясы орындалады }

WriteLn('A =', A:5:3); {нәтижені экранға шығарамыз}

END. {программа соңы}

Есеп 2. Кез келген 3 бүтін сан берілген: X, Y және Z. Осы сандарды кему реті бойынша орналастыратын программа құру қажет.

Program esep2_3;

Var

x,y,z,n: integer; {x,y,z – енгізілетін сандар, n – уақытша буфер}

begin writeln('Бүтін сандарды енгіз: X, Y және Z');

readln(x,y,z); { x,y,z бүтін сандарын енгізу}

if (x < y) then { егер х– у санынан кіші болса}

begin

n:=x; { n – буферіне х –тің мәнін меншіктейміз}

x:=y; { х –ке у –тің мәнін меншіктейміз}

y:=n; { у –ке n – буферіндегі мәнді меншіктейміз}

end;

if (y < z) then { егер y–z санынан кіші болса}

begin

n:=y; { n – буферіне y –тің мәнін меншіктейміз}

y:=z; { y –ке z –тің мәнін меншіктейміз}

z:=n; { z –ке n – буферіндегі мәнді меншіктейміз}

end;

if (x < y) then

begin

n:=x;

x:=y;

y:=n;

end;

if (y < z) then

begin

n:=y;

y:=z;

z:=n;

end;

writeln('Сандар кему реті бойынша орналастырылды:',x,' ',y,' ',z);

end.

Сергіту жаттығулары (2 мин)

5) Жаңа тақырыпты бекіту (10-15 мин)

Тапсырмалар мен сұрақтар:

Тапсырма №1.

а)

б)

Тармақты алгоритмдерді программалаудың әдісін пайдаланып, осы функциялардың мәндерін есептейтін программа құрыңдар. Компьютерде орындап, нәтижесін көрсет.

6)Сабақты қорытындылау

Оқушыларды шартты программалар құрып үйрету.

7) Үйге тапсырма

IF … THEN тармақталу операторлары. Таңдау операторы.

жүктеу 1,41 Mb.

Достарыңызбен бөлісу:

1 2 3 4 5 6 7 8