Ұстаздар сайты u-s.kz Сайттың атауы www.u-s.kz
» » Паскаль тілінің параметрлі қайталану операторы (практикалық сабақ)

3-03-2015, 07:27
Паскаль тілінің параметрлі қайталану операторы (практикалық сабақ)
Сабақтың мақсаты:

Білімділігі: Оқушыларды Паскаль тілінің шартты алдын ала
тексеретін қайталу операторымен таныстырып, программа құруға дағдыландыру;

Дамытушылығы: Оқушылардың Паскаль программалау тілінде
есеп шығару мүмкіндіктерін, логикалық ойлау қабілеттерін дамыту;

Тәрбиелік: Оқушыларды тәрбиелікке, тиянақтылыққа,
ұқыптылыққа тәрбиелеу.

Сабақтың түрі: Практикалық сабақ

Сабақтың барысы:
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 санының қосындыларын есептейтін бағдарлама құрып келу

Сабақ аяқталды, сау болыңдар
Соңғы жарияланған материалдар тізімі
Вложенные циклы
Паскаль бағдарламалау тілінде сызықтық бағдарлама құру
Сызықтық алгоритмдерді программалау
Паскаль тілінің қарапайым операторлары
Литерлік шамаларға есептер шығару
Информатикадан 9 сыныпқа арналған бақылау жұмысы СТО арқылы
Сызықтық алгоритмдерді программалау
Циклдік алгоритмдер
Көп өлшемді жиымдармен (массивтермен) жұмыс
Паскаль тілінің параметрлі қайталану операторы (практикалық сабақ)

АвторИзтлеуова Гульмира танатовна

Қызылорда қаласы № 253 орта мектеп

Бөлім: Материалы / Информатикадан презентациялар | Көрсетілім: 1592 | Қосты: NA | Ілмек сөздер:
Информация
Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.
Бөлімдер
Авторлық бағдарлама
Коучинг жоспарлары
Мектеп әкімшілігі
Мектептен тыс мекемелер
Сыныптан тыс жұмыс
Оқушымен жұмыс
Тәрбие сағаты
Ата-аналармен жұмыс
Қосымша жинақтар
Бастауыш сыныпқа арналған ашық сабақтар
Қазақ тілінен ашық сабақтар
Әдебиеттен ашық сабақтар
Открытие уроки по русскому языку
Уроки литературы
Ағылшын тілінен ашық сабақтар
Биологиядан ашық сабақтар
Химиядан ашық сабақтар
Физикадан ашық сабақтар
Математикадан ашық сабақтар
Информатикадан ашық сабақтар
Тарихтан ашық сабақтар
Географиядан ашық сабақтар
Адам және қоғам пәнінен ашық сабақтар
Психологиядан ашық сабақтар
АӘД пәнінен ашық сабақтар
Өзін-өзі тану пәнінен ашық сабақтар
Құқықтан ашық сабақтар
Экономикадан ашық сабақтар
Музыкадан ашық сабақтар
Технологиядан ашық сабақтар
Дене шынықтыру пәнінен ашық сабақтар
Сызу сурет пәндерінен ашық сабақтар