Предпросмотр материала:
Read , Readln,Write, Writeln операторлары
Алгоритм дегеніміз не? Алгоритмнің қандай негізгі қасиеттері бар? Алгоритмдерді қандай тәсілдермен бейнелеуге болады? Блок-схема дегеніміз не? Меншіктеу командасының құрылымы қандай және ол қалай жазылады? Паскаль тіліндегі программаның негізгі құрылымы қандай? Алгоритм дегеніміз нәтижеге жету мақсатында әрекеттердің рет-ретімен орындалу тізбегі. Алгоритм қасиеттері: Түсініктілік,дискерттілік,анықтылық,нәтижелік,жалпылық Алгоритмді сөздік,кестелі,графикалық,программалық тәсілдермен бейнелейміз Блок схема деп алгоритмнің графикалық түрде жазылуы := program esep; cипаттау бөлімі begin операторлар бөлімі end.
Read , Readln,Write, Writeln операторларының атқаратын қызметтері қандай? Read- ? белгісін шығарып мәлімет енгізуді күтеді. Readln-мәліметті жаңа жолдан бастап оқиды. Write- апострафпен қоршаған мәтіндер немесе айнымалы болады. Writeln- -мәліметті жаңа жолдан бастап оқиды.
Мысалы: var I: real; J: integer; K: char; begin Read (I, J, K); Программаға мынадай бастапқы мәндер енгізіледі делік: 212.5 38 ‘п’ Мысалы: VAR A, B: REAL; BEGIN READ (A,B); … END. A, B айнымалылары үшін 4 5 Enter орындалса, онда машина оларды А = 4.0, B = 5.0 түрінде қабылдайды.
Мысалы, егер B =17.15 болып, мына команда орындалғанда: WRITE (‘B мәні = ’, B); экранда В мәні = 1.715E+01 b = 56 мәні үшін WRITE (b :5) операторы экранға « 56» WRITE(123.456:10:4); WRITE(123.456:6:2); WRITE (Y : m: n)Мұндағы m – нәтижеге берілген барлық орын, n – үтірден соңғы бөлшек бөлігіне берілетін орындар саны. Мысалы, C = -145.7865 болғанда WRITE(C:8:3) операторы экранға -145.786 мәнін шығарады, мұндағы жалпы орындар саны – 8, ал бөлшек 3 санмен бейнеленетіндіктен соңғы бір цифр жазылмай қалып отыр. WRITE (‘Y =’, Y:8:3) Y = 1.76 болса, экраннан Y = 1.760 123.4560 123.46
Экранға «Менің бірінші программа жазуым» сөзін шығару шешімі: Program мысал1; Begin writeln(‘Менің бірінші программа жазуым’); readln; end. Екі сан қосындысын табу программасы. Program мысал2; Var A,B,S: Integer; Begin Writeln(‘ А, В мәндерін енгізу’); Read (A,B); S:=A+B; Writeln(‘S=‘, S); Readln (S); End.
мысал3: Радиусы R болатын шеңбер ұзындығын есептеу программасын құру қажет. Шығарылуы: program B1; const pi=3.14159; var R:real; L:real; begin writeln(‘R мәнін енгізіңдер:’); read (R); L:=2*pi*R; writeln(‘нәтиже:’); writeln(‘шеңбер ұзындығы L =’, L:8:3); end. Экранда төмендегідей нәтиже көрінеді: R мәнін енгізіңдер: 0.2 нәтиже: шеңбер ұзындығы L =1.257
X = 7, Y = 15, Z = 11, ал R = 450,08 Оператордың жазылуыЭкрандағы нәтижесі Write (X, Y); Write (X, ’_,_’, Y); Write (’X =’, X); Write (X, ’ ’:3,Z ); Write (’X+Y =’, X+Y); Write (Z, ’-соңы’); Write (’бітті’); 7 15 7_,_15 X=7 7 11 X+Y = 22 11-cоңы бітті
1 тапсырма. Мәндерін табыңыз. Экранға қандай мәлімет шығады? WRITE(3*2) – шығады WRITE(‘3*2=‘) – шығады WRITE(‘12*2=‘, 12*2) – шығады WRITE(‘Менің Отаным - Қазақстан’) - шығады: WRITE(6div2+5mod2) – WRITE(7/3:3:1) –
2 тапсырма. Тіктөртбұрыштың периметрін табу программасын құрыңдар. ДК орындап жауабын алыңыз.
Program f; Var v, t, s::integer; Begin readln(v, t); s:=v*t; Writeln (‘s=‘,s); End; 3. Program k; Var x,y:integer; z: real; Begin z:=(sin(x)-y)/(abs(y)+cos(y)); Writeln(‘z=‘,z); End. 2. Program p1; Var A,B,X:Real; Begin Readln(A,B); X:=Sqr(A)+Sqr(b); Writeln(‘Қосынды=‘,X:2:4); End. 1. Автомобильдің жүрген жолын табу Екі нақты санның квадраттарының қосу программа сы Өрнектің мәнін есептеу Жауаптары Есептері Р/с Трапецияның ауданын табу 4 тапсырма. 4.Program R; Var a,b,h, s::integer; Begin readln(a,b,h); s:=(a+b)*h/2; Writeln (‘s=‘,s); End;
5 тапсырма. Программа құрыңыз
6 тапсырма. Қатесін тап. Радиусы R-ге тең шеңбер берілген. Шеңбердің ұзындығын есептеу программасын құр. Program шеңбер; Const PI=3.14159; Var L: Real ; R Integer; Begin Writeln(‘R-ді енгіз’) Readln (R); L=2*Pi*R Writeln(‘L=‘,L:4:2); End. Дұрыс жауабы: Program шеңбер; Const PI=3.14159; Var L: Real ; R: Integer; Begin Writeln(‘R-ді енгіз’); Read (R); L:=2*Pi*R; Writeln(‘L=‘,L:4:2); End.
Ax2 + bx + c a*sqr(x)-b*x+c Sqrt (abs(ln(cos(x)) + sin(x)))) (Sqr(a) + exp (x)) /(a*b*sqr(sin(x))*sin(x))
Үйге тапсырма. №1. Y=(AX+B)-С өрнегінің алгоритмін, блок-схемасын,программасын құрып келу. №2. y=x2+1 функциясын есептейтін программа жазыңыз.
Сабақтың тақырыбы: Read , Readln,Write, Writeln операторлары
Сабақтың мақсаты:
А) бiлiмдiлiк: оқушыларды Паскаль тілінде сызықтық алгоритмдерді бағдарламалар құруға үйрету.
Ә) дамытушылық: балалардың Паскаль тіліндегі білімдері мен дағдыларын, сызықтық бағдарлама туралы түсініктерін дамыту.
Б) тәрбиелiк: оқушыларды еңбексүйгіштікке, сауатты азамат болуға тәрбиелеу.
Сабақтың көрнектілігі: Презентациялық бағдарлама,
Паскаль программалау бағдарламасы
Сабақтың түрі:Аралас, интерактивті сабақ
Сабақтың барысы:1.Ұйымдастыру бөлімі
2.Үй тапсырмаларын сұрау.
1) Алгоритм дегеніміз не?
2) Алгоритмнің қандай негізгі қасиеттері бар?
3) Алгоритмдерді қандай тәсілдермен бейнелеуге болады?
4) Блок-схема дегеніміз не?
5) Программалау тілі деген не?
6) Қызметші сөздерге нелер жатады? Оператор дегеніміз не?
7) Меншіктеу командасының құрылымы қандай және ол қалай жазылады?
8) Паскаль тіліндегі программаның негізгі құрылымы қандай?
Профессия: Специалист по метрологии
Профессия: Менеджер по управлению сервисами ИТ
Профессия: Преподаватель информатики
Профессия: Учитель информатики
Профессия: Учитель информатики
В каталоге 7 152 курса по разным направлениям
Учебник: «Информатика (базовый уровень)», Семакин И.Г., Хеннер Е.К., Шеина Т.Ю.
Тема: Глава 2. Интернет
Учебник: «Информатика (базовый уровень)», Семакин И.Г., Хеннер Е.К., Шеина Т.Ю.
Тема: § 6. Проектирование многотабличной базы данных
Учебник: «Информатика», Босова Л.Л., Босова А.Ю.
Тема: 1.2.1. Представление целых чисел
Учебник: «Информатика (в 2 частях)», Матвеева Н.В., Челак Е.Н., Конопатова Н.К., Панкратова Л.П., Нурова Н.А.
Тема: 5. Компьютер как система
Учебник: «Информатика. Учебное пособие для общеобразовательных учреждений с русским языком обучения», Г. А. Заборовский, А. Е. Пупцев
Тема: § 16. Информационные системы
Учебник: «Информатика. Углубленный уровень (в2 частях)», Поляков К.Ю., Еремин Е.А.
Тема: § 28. Мультимедиа