Сабақтың мақсаты:
Білімділігі: Оқушыларды Паскаль тілінің шартты алдын ала
тексеретін қайталу операторымен таныстырып, программа құруға дағдыландыру;
Дамытушылығы: Оқушылардың Паскаль программалау тілінде
есеп шығару мүмкіндіктерін, логикалық ойлау қабілеттерін дамыту;
Тәрбиелік: Оқушыларды тәрбиелікке, тиянақтылыққа,
ұқыптылыққа тәрбиелеу.
Сабақтың түрі: Практикалық сабақ
Сабақтың барысы:
1. Ұйымдастыру
2. Үй тапсырмасын тексеру
3. Жаңа сабақты түсіндіру
4. Компьютермен жұмыс
4. Сабақты бекіту
5. Үйге тапсырма
№9. 1-ден n – ге дейінгі сандардың квадраттарының қосындысын табатын программа құру керек.
Program kvadrat;
Var s, i , n: integer;
Begin
WriteLn (‘ n = ’) ;
Readln (n);
I:=1;
S:=0;
While i<=n do
Begin S:=S + sqr (i);
I:= i+1;
WriteLn (‘ S=’ , S);
End;
End.
№10. Y= ex sinx+cosx функциясының мәндерінің [a, b] аралығында h қадамы бойынша өзгеру кестесін құратын программа құрыңдар.
Program y- tap;
Var x, y, a, b, h: real;
Begin
WriteLn (‘ a , b , h -? ’);
ReadLn (a, b , h);
X:= a;
While x<= b do
Begin
Y:=exp (x) * sin (x) + cos(x);
WriteLn (‘x=’, x:5:2, ‘, ‘ , y= ‘, y:5:2);
X:=x+h;
End;
End.
№11. Х € [1; 3] аралығындағы 0,2 қадаммен өзгергендегі y= функциясының мәнін тап.
Program esep;
Var x, y: real;
Begin
X:=1;
While x<=3 do
Begin y:= sqrt (x+1)-1/x;
Writeln (‘ x=’ , x, ‘y=’, y);
x:=x+0.2;
end;
readln;
end.
№12 Р=1*2*3 … * N N ! факториалды табу программасын жаз.
Program fakt;
Var I , n , p: integer;
Begin
WriteLn ( ‘ n= ‘);
ReadLn (n) ;
I: = 1;
P:= 1;
Repeat
P:= p*1;
I:= i+1;
Until i>n;
Writeln (p:4);
End.
№12 Р=1*2*3 … * N N ! факториалды табу программасын жаз.
Program fakt;
Var I , n , p: integer;
Begin
WriteLn ( ‘ n= ‘);
ReadLn (n) ;
I: = 1;
P:= 1;
Repeat
P:= p*1;
I:= i+1;
Until i>n;
Writeln (p:4);
End.
№14. x €[1 ; 3 ] аралығында 0,2 қадаммен өзгергендегі y= функциясының мәнін тап.
Program esep;
Var x, y: real;
Begin
X:=1;
repeat
y:= sqrt (x+1)-1/x ;
Writeln ( x:3, y:5);
x:=x+0.2;
until x>3
readln;
end.
Үй тапсырмасы: 100 санның әрбір 3 санының қосындыларын есептейтін бағдарлама құрып келу
Сабақ аяқталды, сау болыңдар
Соңғы жарияланған материалдар тізімі
Бөлім: Материалы / Информатикадан презентациялар |
Көрсетілім: 2824 |
|
|
|
Паскаль тілінің параметрлі қайталану операторы (практикалық сабақ)
Білімділігі: Оқушыларды Паскаль тілінің шартты алдын ала
тексеретін қайталу операторымен таныстырып, программа құруға дағдыландыру;
Дамытушылығы: Оқушылардың Паскаль программалау тілінде
есеп шығару мүмкіндіктерін, логикалық ойлау қабілеттерін дамыту;
Тәрбиелік: Оқушыларды тәрбиелікке, тиянақтылыққа,
ұқыптылыққа тәрбиелеу.
Сабақтың түрі: Практикалық сабақ
Сабақтың барысы:
1. Ұйымдастыру
2. Үй тапсырмасын тексеру
3. Жаңа сабақты түсіндіру
4. Компьютермен жұмыс
4. Сабақты бекіту
5. Үйге тапсырма
№9. 1-ден n – ге дейінгі сандардың квадраттарының қосындысын табатын программа құру керек.
Program kvadrat;
Var s, i , n: integer;
Begin
WriteLn (‘ n = ’) ;
Readln (n);
I:=1;
S:=0;
While i<=n do
Begin S:=S + sqr (i);
I:= i+1;
WriteLn (‘ S=’ , S);
End;
End.
№10. Y= ex sinx+cosx функциясының мәндерінің [a, b] аралығында h қадамы бойынша өзгеру кестесін құратын программа құрыңдар.
Program y- tap;
Var x, y, a, b, h: real;
Begin
WriteLn (‘ a , b , h -? ’);
ReadLn (a, b , h);
X:= a;
While x<= b do
Begin
Y:=exp (x) * sin (x) + cos(x);
WriteLn (‘x=’, x:5:2, ‘, ‘ , y= ‘, y:5:2);
X:=x+h;
End;
End.
№11. Х € [1; 3] аралығындағы 0,2 қадаммен өзгергендегі y= функциясының мәнін тап.
Program esep;
Var x, y: real;
Begin
X:=1;
While x<=3 do
Begin y:= sqrt (x+1)-1/x;
Writeln (‘ x=’ , x, ‘y=’, y);
x:=x+0.2;
end;
readln;
end.
№12 Р=1*2*3 … * N N ! факториалды табу программасын жаз.
Program fakt;
Var I , n , p: integer;
Begin
WriteLn ( ‘ n= ‘);
ReadLn (n) ;
I: = 1;
P:= 1;
Repeat
P:= p*1;
I:= i+1;
Until i>n;
Writeln (p:4);
End.
№12 Р=1*2*3 … * N N ! факториалды табу программасын жаз.
Program fakt;
Var I , n , p: integer;
Begin
WriteLn ( ‘ n= ‘);
ReadLn (n) ;
I: = 1;
P:= 1;
Repeat
P:= p*1;
I:= i+1;
Until i>n;
Writeln (p:4);
End.
№14. x €[1 ; 3 ] аралығында 0,2 қадаммен өзгергендегі y= функциясының мәнін тап.
Program esep;
Var x, y: real;
Begin
X:=1;
repeat
y:= sqrt (x+1)-1/x ;
Writeln ( x:3, y:5);
x:=x+0.2;
until x>3
readln;
end.
Үй тапсырмасы: 100 санның әрбір 3 санының қосындыларын есептейтін бағдарлама құрып келу
Сабақ аяқталды, сау болыңдар
Соңғы жарияланған материалдар тізімі
Автор Изтлеуова Гульмира танатовна
Қызылорда қаласы № 253 орта мектеп
Информация
Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.
Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.
Бөлімдер
Авторлық бағдарлама |
Коучинг жоспарлары |
Мектеп әкімшілігі |
Мектептен тыс мекемелер |
Сыныптан тыс жұмыс |
Оқушымен жұмыс |
Тәрбие сағаты |
Ата-аналармен жұмыс |
Қосымша жинақтар |
Бастауыш сыныпқа арналған ашық сабақтар |
Қазақ тілінен ашық сабақтар |
Әдебиеттен ашық сабақтар |
Открытие уроки по русскому языку |
Уроки литературы |
Ағылшын тілінен ашық сабақтар |
Биологиядан ашық сабақтар |
Химиядан ашық сабақтар |
Физикадан ашық сабақтар |
Математикадан ашық сабақтар |
Информатикадан ашық сабақтар |
Тарихтан ашық сабақтар |
Географиядан ашық сабақтар |
Адам және қоғам пәнінен ашық сабақтар |
Психологиядан ашық сабақтар |
АӘД пәнінен ашық сабақтар |
Өзін-өзі тану пәнінен ашық сабақтар |
Құқықтан ашық сабақтар |
Экономикадан ашық сабақтар |
Музыкадан ашық сабақтар |
Технологиядан ашық сабақтар |
Дене шынықтыру пәнінен ашық сабақтар |
Сызу сурет пәндерінен ашық сабақтар |