Begin
<процедура денесi>
End;
Function <идентификатор>[(<формаль параметрлер тiзiмi>:<тип>)]:<нәтиже типi>;
Begin
<функция денесi>
End;
Әдебиет: [2], [4]
7 тақырып. Файлдармен жұмыс.
Жоспар:
-
Файлдар классификациясы: файлдарды типтері және қатынас әдісі бойынша бөлінуі.
-
Мәтіндік файлдар. Нақты және логикалық файлдар түсінігі.
-
Мәтіндік файлдарды өдеуге арналған процедуралар мен функциялар.
-
Берілгендерді енгізу шығару.
Әр сұрақтың қысқаша мазмұны
Pascal тiлiнде файл – деп, деректердiң қандайда бiр жиынтығын сақтай алатын сыртқы еске сақтау құрылғысындағы жадының обылысын айтамыз.
Бұл жады облысына қандайда бiр деректердi орналастыруға да, және одан алуға да болады. Бұл әрекеттер файлға енгiзу– шығару – деп, аталады.
Файлдық айнымалылар және типтердi қарастырайық. Файлдық айнымалыны сиппаттаудың жазылуы:
Var
F: file of integer;
Жазуды былай түсiнемiз:
F– атты бүтiн сандардың (саны белгiсiз) сыртқы жадыда орналасқан (магниттi дискiде) тiзiмiн айтады.
Әдебиет: [2], [4]
8 тақырып. Символдық жолдармен жұмыс.
Жоспар:
-
Символдық жне жолдық мндер.
-
Символдық мндермен орындалатын амалдар.
-
Жолды өдеу алгоитмі. Жолдан ішкі жолды іздеу алгоритмі.
-
Жолдармен жұмыс істеуге арналған программалау тіліндегі құрамдас функциялар мен процедуралар.
Әр сұрақтың қысқаша мазмұны
Паскальда жолдық (string) тип пайдаланылады. Жол белгілі бір символдар тізбегі. Өрнектерде жол екі жағынан апострофқа алынып жазылады. Жолдық символдар саны 0-ден 255 дейінгі аралықта жатады. String типті айнымалыны тип бөлігінде сипаттау арқылы немесе бірден айнымалылар бөлігінде сипаттауға болады.
Жазылуы:
Type <типті атауы>= string[жолды е үлкен ұзындығы]
Var<айнымалы>:<типті атауы>;
Var<айнымалылар>: string[жолды е үлкен ұзындығы];
Әдебиет: [2], [4]
1.1 Pascal (Delphi7) тілі ортасымен танысу -
Студент бумасында өз тобыңызбен аталатын бума құрыңыз.
-
Бас менюден Delphi7 жұмысқа қосыңыз.
-
Менюден: File-New-Other-Console Application командасын таңдаңыз. Бұл консольдық режимде жұмыс істеу деп аталады.
-
Экранда төмендегідей текстпен терезе шығады.
program Project1; {Жобаның Delphi7 берген аты}
uses SysUtils; Begin { TODO -oUser -cConsole Main : Insert code here } - бұл орынға есептің программасы жазылады end.
1 жаттығу
x=2; y=6 мәндерінде олардың қосындысын табу бағдарламасын құру.
-
Delphi7 терезесіндегі тексті толықтырыңыз.
рrogram Project1;
{$APPTYPE CONSOLE} uses SysUtils; var x,y,z,a:integer; begin
x:=2;
y:=6;
z:=x+y;
writeln(‘kosyndy z=’,z);
readln;
end.
-
Жобаны File-Save Project as командасымен өзіңіздің Прак1 бумасында ornek1 атымен сақтаңыз.
-
Менюден Run-Run командасын беріп, бағдарламаны орындауға жіберіңіз.
-
Егер бағдарлама тексін дұрыс терсеңіз экранға жауап шығады.
kosyndy z=8
Егер бағдарлама тексінде қате болса, ол туралы экранның төменгі бөлігінде хабарлама шығады. Қатені түзетіп, 2-пунктті орындаңыз.
-
Жауап шыққанша 2-4 қадамдарды орындаңыз
-
х пен у басқа мәндерге түзетіп, 2-4 қадамдарды қайталаңыз.
-
Шыққан жауапты қараңыз.
Бағдарлама кодына түсініктеме.
1) рrogram Project1; жолы бағдарламаның атын білдіреді Project1 (Жоба1) аты автоматты түрде беріледі. Әр жобаны ерекшелеу үшін, оған басқа ат беріп сақтауға болады.
2) uses SysUtils; қажет SysUtils; кітапханасын ашады. 3) var x,y,z,a: integer; бағдарламаның айнымалыларды сипаттау бөлімінде пайдаланылатын айнымалылардың типтері (яғни, қабылдайтын мәндерінің типі сипатталады.). integer x,y,z,a аталған айнымалылар бүтін типтегі мәндер қабылдайтынын білдіреді. begin
end. арасында бағдарлама тексі жазылады.
4) x:=2;
y:=6;
z:=x+y; командасы z айнымалысына өрнектің нәтижесін меншіктейді.
Writeln (‘kosyndy z=’,z); нәтижені экранға шығарады.
Тапсырма. Үш санның көбейтіндісін табу программасын құрыңыз.
ПР2. Мәліметтерді енгізу - шығаруды ұйымдастыру.
2.1 Мәліметтерді шығару
Теориялық бөлім
WRITE – айнымалының мәнiн, өрнектiң мәнiн, текстi экранға шығарады.
Жазылу форматы: write(ln) (<параметр>);
Жазылу түрлерi:
writeln (өрнек); – өрнектiң мәнiн экранға шығарады. Мысал, writeln (sqr(25));
writeln(x); – x айнымалының мәнi шығады.
writeln (‘текст’) – апострофтың iшiндегi текст шығады.
writeln ( өрнек, ’текст’, айнымалылар);
writeln; – бос жол шығарады.
1 жаттығу. Қадыр Мырзалиевтің «Ана тілі» тақпағының бір шумағын экранға шығару.
1. Бағдарлама тексін теріңіз
program text;
Достарыңызбен бөлісу: |