технологияларды жүзеге асырып, өмірге енгізу, игеру және жетілдіру - бүгінгі мектеп оқушылары сіздердің еншілеріңіз” Н.Назарбаев
- Главная
- Разное
- Образование
- Спорт
- Естествознание
- Природоведение
- Религиоведение
- Французский язык
- Черчение
- Английский язык
- Астрономия
- Алгебра
- Биология
- География
- Геометрия
- Детские презентации
- Информатика
- История
- Литература
- Математика
- Музыка
- МХК
- Немецкий язык
- ОБЖ
- Обществознание
- Окружающий мир
- Педагогика
- Русский язык
- Технология
- Физика
- Философия
- Химия
- Шаблоны, фоны, картинки для презентаций
- Экология
- Экономика
Презентация, доклад Тақырыбы: Паскаль тілінде есептер шығару 9 сынып
Содержание
- 1. Презентация Тақырыбы: Паскаль тілінде есептер шығару 9 сынып
- 2. Сабақтың тақырыбы:Pascal тілінде есептер шығару.
- 3. Сабақтың мақсаты:Білімділік: Оқушыларға Паскаль тілінде программа құрылымына
- 4. Сабақтың көрнекілігі: интерактивті тақта, компьютерлер, слайд,
- 5. БІЛЕМІЗБІЛГІМІЗ КЕЛЕДІБІЗ ҮШІН ЖАҢАЛЫҚБӘРІМІЗ БІРГЕҚАТЕСІЗ ШЫҒАРАМЫЗОЙЛАЙЫҚ ТА,ОЙНАЙЫҚ
- 6. Миға шабуылЖаттығу кезеңіКомпьютерде жұмысСабақты бекіту сұрақтары “Ойлан, тап”, “Полиглот”,тест сұрақтарыБағалау Үй тапсырмасыСабақтың жоспары:
- 7. І.Қызығушылықты оятуПаскаль тілін 1968-1971 жылдары швейцариялық ғалым
- 8. 1992 жылы Borland International фирмасы Паскаль программалау
- 9. Слайд 9
- 10. Миға шабуыл
- 11. Қарапайым типке жататындарын тап! (дұрыс шертсең жапырақтар сыбдырлап белгі береді)
- 12. Логикалық типке жататын асқабақтарды жина!
- 13. Символдық типке жататын асқабақтарды жина!
- 14. Тіркестік типке жататын асқабақтарды жина!
- 15. Нақты типке жататын асқабақтарды жина!
- 16. div, mod функциялары қандай типке қолданылады? (дұрысы
- 17. Логикалық типке қолданылатын амалдарды тап. (дұрыс тапсаң шар әуеге қалықтайды!)
- 18. Символдық типке қолданылатын функцияларды тап. (дұрыс тапсаң шар әуеге қалықтайды!)
- 19. Бүтін типке қолданылатын амалдарды тап. (дұрыс тапсаң шар әуеге қалықтайды!)
- 20. Үй тапсырмасын сұрау
- 21. Сұрақтар:Паскаль тілін қай жылы кім ұсынды?
- 22. Алгоритм дегеніміз не?
- 23. Программадегеніміз не?
- 24. Алгоритм түрлері қанша?Оларды атап,анықтамасынайт?
- 25. Мысал: k =(x2 + y2) *
- 26. №1. Екі санның үлкенін табатын программа құр.№2.
- 27. №6. Адам жасына қарап, оларды әлі мектепке
- 28. №1. Екі санның үлкенін табатын программа құр. Program
- 29. №3 Екі санның кішісін табатын программа құру
- 30. №5 Үш кесіндінің ұзындықтары берілген. Егер
- 31. №6. Адам жасына қарап, оларды әлі мектепке
- 32. №7. Екі сан берілген. Егер бірінші санның
- 33. №8.Пернетақтадан трамвай билетінің нөмірі (1 орынды 6
- 34. Паскаль тілін 1968-1971 жылдары швейцариялық ғалым
- 35. Мағынаны тану
- 36. y = a*x
- 37. y = a*x
- 38. ПолиглотБағдарламаБасыТұрақтыНақтыБүтінЕнгізуШығаруЕгерОндаӘйтпесесоңы
- 39. Тест сұрақтарына жауап беру
- 40. 8. Бағдарламаның соңы1. Негізгі бағдарламаның басы2.
- 41. Оқушыларды бағалау Үйге тапсырма: 3.1 тақырып (55-56 бет), 3.2-3,3 тақырып (57-59 бет); Оқулықтан:
- 42. Сау болыңыздар!
Сабақтың тақырыбы:Pascal тілінде есептер шығару.
Слайд 3Сабақтың мақсаты:
Білімділік: Оқушыларға Паскаль тілінде программа құрылымына және қарапайым операторларға
әртүрлі есептер шығару.
Тәрбиелік: Оқушыларды ұқыптылыққа,адамгершілікке, жауапкершілікке тәрбиелеу.Оқушыларды программалық сауатылыққа тәрбиелеу.
Дамытушылық: Оқушылардың ой - өрісін дамыту;
Слайд 4Сабақтың көрнекілігі:
интерактивті тақта,
компьютерлер, слайд,
оқулық.
Сабақтың түрі: практикалық сабақ.
Сабақтың әдісі:
практикум, сұрақ
– жауап,тест , қосымша тапсырмалар.
Сабақтың типі: дамытушылық.
Сабақтың типі: дамытушылық.
Слайд 6Миға шабуыл
Жаттығу кезеңі
Компьютерде жұмыс
Сабақты бекіту сұрақтары “Ойлан, тап”, “Полиглот”,тест сұрақтары
Бағалау
Үй
тапсырмасы
Сабақтың жоспары:
Слайд 7І.Қызығушылықты ояту
Паскаль тілін 1968-1971 жылдары швейцариялық
ғалым Никлаус Вирт қолайлы программалау
тілі
ретінде ұсынған болатын.
Бұл тілдің стандарты кейінірек бекітілді, ол сол
кездерде кең таралған
АЛГОЛ, ФОРТРАН, БЕЙСИК тілдеріне қарағанда
жетілдірілген, жұмыс істеуге ыңғайлы тіл болды.
Паскаль тілінде жазылған программаның дұрыстығын
компьютерде тексеру және жіберілген қатені түзету оңай.
Қазіргі кезде Паскаль тілі кез келген күрделі
есептерді шығара алатын,
кең таралған стандартты оқу тіліне айналды.
ретінде ұсынған болатын.
Бұл тілдің стандарты кейінірек бекітілді, ол сол
кездерде кең таралған
АЛГОЛ, ФОРТРАН, БЕЙСИК тілдеріне қарағанда
жетілдірілген, жұмыс істеуге ыңғайлы тіл болды.
Паскаль тілінде жазылған программаның дұрыстығын
компьютерде тексеру және жіберілген қатені түзету оңай.
Қазіргі кезде Паскаль тілі кез келген күрделі
есептерді шығара алатын,
кең таралған стандартты оқу тіліне айналды.
Слайд 8
1992 жылы Borland International фирмасы
Паскаль программалау тілінің негізінде құрылған
екі
құрама программа шығарады: Borland Pascal 7.0
және Turbo Pascal 7.0. Олардың алғашқысы үш түрлі
режимде жұмыс істей алады – MS DOS-тің қарапайым
мен қорғанған жүйесінде және Windows операциялық
жүйесінде.
Оның жұмысы үшін қатты дискіде 30 Мбайт бос орын және
жедел жадтың 2 Мбайт бөлігі қажет. Ал, Турбо Паскаль
7.0 MS DOS-тың қарапайым режимінде және Windows
операциялық жүйесінде жұмыс істей алады, ол компьютер
құрылғыларының сипаттамаларына Borland Pascal 7.0
программалау тіліне қарағанда өте төмен талаптар қояды.
және Turbo Pascal 7.0. Олардың алғашқысы үш түрлі
режимде жұмыс істей алады – MS DOS-тің қарапайым
мен қорғанған жүйесінде және Windows операциялық
жүйесінде.
Оның жұмысы үшін қатты дискіде 30 Мбайт бос орын және
жедел жадтың 2 Мбайт бөлігі қажет. Ал, Турбо Паскаль
7.0 MS DOS-тың қарапайым режимінде және Windows
операциялық жүйесінде жұмыс істей алады, ол компьютер
құрылғыларының сипаттамаларына Borland Pascal 7.0
программалау тіліне қарағанда өте төмен талаптар қояды.
Слайд 16div, mod функциялары қандай типке қолданылады? (дұрысы тышқанмен шерткенде жасыл түске
боялады)
Бүтін (integer)
Нақты (real)
Символдық (char)
Логикалық (boolean)
Тіркестік (string)
Слайд 25 Мысал: k =(x2 + y2) * x+y, мұндағы функциясының мәнін
есептейтін программа құру керек.
Program esep 2 ;
Var k:real;
Const x = 5, y = 2.8;
Begin
K: = srq (x) + sqr(y)* (x+y);
Writeln (‘k = ‘, k);
End.
Program esep 2 ;
Var k:real;
Const x = 5, y = 2.8;
Begin
K: = srq (x) + sqr(y)* (x+y);
Writeln (‘k = ‘, k);
End.
Практикалық тапсырмалар
Есептер шығару
Слайд 26№1. Екі санның үлкенін табатын программа құр.
№2. Үш санның үлкенін табатын
программа құру керек.
№3 Екі санның кішісін табатын программа құру керек.
№4. Үш санның кішісін табатын программа құру керек.
№5 Үш кесіндінің ұзындықтары берілген. Егер бұл үш кесіндіден үшбұрыш құру мүмкін болса, онда оның периметрін және ауданын табыңдар.
Деңгейлік тапсырмалар
І – деңгей
Слайд 27№6. Адам жасына қарап, оларды әлі мектепке бармаған, мектеп оқушысы, жұмысшы,
зейнеткер деген төрт топтың біріне жатқызатын программа құрыңдар. Адам жасы пернетақтадан енгізіледі.
№7. Екі сан берілген. Егер бірінші санның абсолют шамасы екінші санның абсолют шамасынан артық болса, онда біріншісін бес есе азайту керек, әйтпесе екі санды да өзгеріссіз экранға шығару керек.
№8.Пернетақтадан трамвай билетінің нөмірі (1 орынды 6 сан ) енгізіледі. Билет «бақытты» нөмір болатынын анықтаңдар. Бақытты билеттің алғашқы 3 цифрының қосындысы соңғы 3 цифрының қосындысына тең болады.
Деңгейлік тапсырмалар
IІ – деңгей
Слайд 28№1. Екі санның үлкенін табатын программа құр.
Program max;
Var a, b, max:
integer;
Begin
Readln (a,b);
If a>b then max:= a else max:=b;
Writeln (‘ max= ’ , max);
End.
Begin
Readln (a,b);
If a>b then max:= a else max:=b;
Writeln (‘ max= ’ , max);
End.
№2. Үш санның үлкенін табатын программа құру керек.
Program max;
Var a, b, c, x, max: integer;
Begin
Readln (a, b, c);
If a>b then max:= x else max:=c;
Writeln (‘ max= ’ , max);
End.
Есептердің жауаптарын тексеру
Слайд 29№3 Екі санның кішісін табатын программа құру керек.
Program min;
Var a,
b, min : integer;
Begin
Readln (a, b);
If a Writeln ( ‘ min = ‘ , min) ;
End.
Begin
Readln (a, b);
If a Writeln ( ‘ min = ‘ , min) ;
End.
№4. Үш санның кішісін табатын программа құру керек. Есептердің жауаптарын тексеру
Program min;
Var a, b, c, x, min : integer;
Begin
Readln (a, b, c);
If a If x
End.
Слайд 30№5 Үш кесіндінің ұзындықтары берілген. Егер бұл үш кесіндіден үшбұрыш
құру мүмкін болса, онда оның периметрін және ауданын табыңдар.
Program e5;
Var a, b, c : integer;
P1, p, s: real;
Begin
Readln (a, b, c);
If a+b>c then p1: = a+b+c ;
P:= (a+b+c)/2;
S:=sqrt (p*(p-a)*(p-b)*(p-c));
Writeln ( ‘ p1= ‘ , p1:5:2) ;
Writeln (‘ s=’,s:5:2);
End.
Program e5;
Var a, b, c : integer;
P1, p, s: real;
Begin
Readln (a, b, c);
If a+b>c then p1: = a+b+c ;
P:= (a+b+c)/2;
S:=sqrt (p*(p-a)*(p-b)*(p-c));
Writeln ( ‘ p1= ‘ , p1:5:2) ;
Writeln (‘ s=’,s:5:2);
End.
Есептердің жауаптарын тексеру
Слайд 31№6. Адам жасына қарап, оларды әлі мектепке бармаған, мектеп оқушысы, жұмысшы,
зейнеткер деген төрт топтың біріне жатқызатын программа құрыңдар. Адам жасы пернетақтадан енгізіледі.
Program e6;
Var x : integer;
Begin
Writeln (‘ adam jasin engiz’ );
Readln (x);
If x<=6 then writeln (‘ ali mektepke barmagan’ ) else
If (x>6) and (x<=17) writeln (‘ mektep okushisi ‘) else
If (x>17) and (x<58) writeln (‘ jumisshi’) else writeln (‘ zeinetker’);
End.
Program e6;
Var x : integer;
Begin
Writeln (‘ adam jasin engiz’ );
Readln (x);
If x<=6 then writeln (‘ ali mektepke barmagan’ ) else
If (x>6) and (x<=17) writeln (‘ mektep okushisi ‘) else
If (x>17) and (x<58) writeln (‘ jumisshi’) else writeln (‘ zeinetker’);
End.
Есептердің жауаптарын тексеру
Слайд 32№7. Екі сан берілген. Егер бірінші санның абсолют шамасы екінші санның
абсолют шамасынан артық болса, онда біріншісін бес есе азайту керек, әйтпесе екі санды да өзгеріссіз экранға шығару керек.
Program e7;
Var x, y : real;
Begin
Writeln (‘x , y-?);
Readln (x, y);
If abs (x)< abs(y) then x:=x/5;
Writeln (x:5:2, y:5:2);
Readln;
End.
Program e7;
Var x, y : real;
Begin
Writeln (‘x , y-?);
Readln (x, y);
If abs (x)< abs(y) then x:=x/5;
Writeln (x:5:2, y:5:2);
Readln;
End.
Есептердің жауаптарын тексеру
Слайд 33№8.Пернетақтадан трамвай билетінің нөмірі (1 орынды 6 сан ) енгізіледі. Билет
«бақытты» нөмір болатынын анықтаңдар. Бақытты билеттің алғашқы 3 цифрының қосындысы соңғы 3 цифрының қосындысына тең болады.
Program e8;
Var x, y, z, r, k, t, s, n : integer;
Begin
Read (x, y, z, r. k. t );
S:= x+y+z;
N:= r+k+t;
If S= N then writeln (‘ bakitti nomer’) else writeln (‘ bakitti nomir emes’);
End.
Program e8;
Var x, y, z, r, k, t, s, n : integer;
Begin
Read (x, y, z, r. k. t );
S:= x+y+z;
N:= r+k+t;
If S= N then writeln (‘ bakitti nomer’) else writeln (‘ bakitti nomir emes’);
End.
Есептердің жауаптарын тексеру
Слайд 34Паскаль тілін 1968-1971 жылдары швейцариялық ғалым ....
... қолайлы программалау тілі ретінде ұсынған болатын.
Паскаль тіліндегі программа 3 бөліктен тұрады: ...........,
......, ......
Кез келген программаның алғашқы жолы ............ сөзінен
басталатын оның тақырыбынан тұрады.
Одан кейін программаның ішкі объектілерінің ........... жазылады
Тармақталу операторы ................
Паскаль тіліндегі программа 3 бөліктен тұрады: ...........,
......, ......
Кез келген программаның алғашқы жолы ............ сөзінен
басталатын оның тақырыбынан тұрады.
Одан кейін программаның ішкі объектілерінің ........... жазылады
Тармақталу операторы ................
"Ойлан, тап"
Слайд 40
8. Бағдарламаның соңы
1. Негізгі бағдарламаның басы
2. Шығару операторы
3. Бағдаралама тақырыбы
4. Бүтін
санның типі
(-32768 - +32767)
5. Символдық тип
6. Бүтін санның типі
(-127 - +127)
7. Енгізу операторы
С ө з ж ұ м б а қ
Слайд 41Оқушыларды бағалау Үйге тапсырма:
3.1 тақырып (55-56 бет), 3.2-3,3 тақырып (57-59
бет);
Оқулықтан:
