Паскаль

Мазмұны

I Кіріспе бөлім ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .4
II Негізгі бөлім
2.1 нолмен аяқталатын жолдар ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...5
2.2 Кеңейтілген синтаксис ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .5
2.3 Символдық көрсеткіштер және жолдық тұрақтылар ... ... ... ... ... ... ... 6
2.4 Символдық көрсеткіштер және символдқ массивтер ... ... ... ... ... ... ...7
2.5 Символдық көрсеткіштердің идентификациясы ... ... ... ... ... ... ... ... ... 7
2.6 String модулінің функциялары ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .8
2.7 Жолдарды қайта өңдеу ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ..9
2.8 Жолдардың ұзындығын анықтау ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .10
2.9 Жолдарды көшіру ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ..11
2.10 Жолдарды біріктіру ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... 13
2.11 Жолдарды салыстыру ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .14
2.12 Жолдарды көшіру ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .15
2.13 Динамикалық жадтағы жолдарды алу ... ... ... ... ... ... ... ... ... ... ... ... ... 16

III Практикалық бөлім ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ...18
IV Қорытынды бөлім ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .20

Әдебиеттер тізімі ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... 21
Кіріспе

Бұл сабақ жалпы білім беретін жоғарғы оқу орындарында ғана кездеседі . Жалпылап айтқанда программаларды қалай құру және есеп шығарып үйрену үшін арналған .
Атап айтқанда: графикасын, қалай жазу керектігін , есепті шығару жолда -рын, қалай жұмыс атқару керектігін үйретеді.
Бұл сабақты тек оқи қоймай сонымен қатар оны зертханалық жұмыстар ар -қылы меңгере аламыз. Практика жүзінде жүргізілген сабақ барысында сту -денттер меңгеретін дағдылары сан алуан. Олар: ойлау, есептің басын, нәтиже сін ала отырып, соңына жетеді. Сонымен қатар компьютерге еңгізе отырып нәтиже алады. Мұғалім студенттерді қызықтыра есеп шығаруға ынталанды -рады.
Си тілінде программаларды дайындауға және орындауға көмек теседі. Сту- денттердің бұған зейіндері ашылады. Мұнда пән аралық байланыстары өз дең гейінде қарастырылған. Пән студенттердің есеп шығару теориясын дамытуға ықпал жасайды.
Бұл пән алгоритм және информатика пәндеріне қарағанда күрделірек. Айыр машылығы тарау- тақырыптарының кеңейіп , тереңдеп түсінуінде жатыр.
Ал енді өзімнің тақырыбыма тоқталсам Турбо Паскаль нолмен аяқталатын жолдар деп аталатын символдық жолдар класынан тұрады. Мұндай жолдар нақты прграммлық типтерді Турбо Паскальда жазылған нақты программа типтерімен Windows ортасында жұмыс істейтін және басқа тілдермен ( Ас- семблер, Си т.б) жұмыс істеу кезінде қолданылады.
Пайдаланылған әдебиеттер тізімі

1. В Фаронов. Объектно-риентированная среда Delphi. Версия 6. Учебное пособие. "Русская редакция", 2002.
2. Я. Н. Глинский, В. Е. Анохин, В. А. Ряжская – TURBO PASCAL 7.0 и Delphi. Учебное пособие. Москва – Санкт – Петербург-Киев. 2001.
3. Культин Н. Delphi 3. Программирование на Object Pascal. Санкт-
Петербург, 1998. -304 с.
4. Конопка Р. Создание оригинальных компонентов в среде ОеІрһі.Перс англ.Рей.К.:НИПФ «Диа Софт ЛТД», 1996. -152 с.
5. Орлик С.В. Секреты Delphi на примерах. М.: Бином, 1996. - 136 с.
6. Нурбекова Ж. Практикум решения задач на Delphi 5.O. Учебно-
методическое пособие. Павлодар, 2001. -106 с.
7. Халықова К.З. Паскаль тілінде программалау. Оқу құралы. Абай ат.ҚазҰПУ. Алматы, 2002. -2106.
8. Дудина И.П. Построние графиков функций в Delphi. Информатика и образование. №6, 2003, стр.27-31.
9. Давыдова Е.В., Скородумов И.А., Балаханов В.А. Создание базовых элементов интерфейса Windows программы в среде Delphi.
Информатика и образование. №4,5,6. 2002.
10. Халықова К.З., Ануарбекова Г.Ж. Object Pascal тілі. Delphi ортасы. Оқу әдістемелік құрал. – Алматы: Абай ат.ҚазҰПУ, 2008. – 220 бет.
11. Б. Д. Сыдықов, Ш. Т. Шекербекова, Н. И. Культин - Delphi ортасында бағдарламалау практикумы. Алматы, 2005
12. Баженова И.Ю. Delphi 5 : Самоучитель программиста.- 2-е издание.- М.: КУДИЦ-ОБРАЗ, 2000.
13. Программирование в Delphi глазами хакера +CD Фленов М.В. Москва.
14. Самоучитель Основы программирования в Delphi 7 +дискета Культин Н.Б.
15. Г. В. Галисеев "Программирование в среде Delphi 8 for . NET. Самоучитель"
        
        Мазмұны
I Кіріспе
бөлім.......................................................................
..........................4
II Негізгі бөлім
2.1 нолмен аяқталатын
жолдар......................................................................
.5
2.2 Кеңейтілген синтаксис
............................................................................
.5
2.3 Символдық көрсеткіштер және жолдық тұрақтылар
............................6
2.4 Символдық көрсеткіштер және символдқ ... ... ... String ... ... ... Жолдардың ұзындығын
анықтау.............................................................10
2.9 Жолдарды
көшіру......................................................................
................11
2.10 Жолдарды біріктіру
............................................................................
....13
2.11 Жолдарды салыстыру
............................................................................
.14
2.12 Жолдарды
көшіру......................................................................
...............15
2.13 Динамикалық жадтағы жолдарды
алу....................................................16
III Практикалық
бөлім.......................................................................
................18
IV Қорытынды
бөлім.......................................................................
..................20
Әдебиеттер тізімі
............................................................................
................21
Кіріспе
Бұл сабақ жалпы білім ... ... оқу ... ғана ... ... айтқанда программаларды қалай құру және есеп шығарып үйрену үшін
арналған .
Атап айтқанда: графикасын, қалай жазу керектігін , есепті шығару ... ... ... ... керектігін үйретеді.
Бұл сабақты тек оқи қоймай сонымен ... оны ... ... ... ... ... ... жүзінде жүргізілген сабақ ... ... ... ... сан ... Олар: ойлау, есептің басын, нәтиже
сін ала отырып, соңына жетеді. Сонымен қатар компьютерге еңгізе ... ... ... ... қызықтыра есеп шығаруға ынталанды
-рады.
Си тілінде программаларды дайындауға және ... ... ... ... ... зейіндері ашылады. Мұнда пән аралық байланыстары өз дең
гейінде қарастырылған. Пән студенттердің есеп ... ... ... ... пән ... және информатика пәндеріне қарағанда күрделірек. Айыр
машылығы тарау- тақырыптарының кеңейіп , тереңдеп ... ... енді ... ... ... Турбо Паскаль нолмен аяқталатын
жолдар деп аталатын символдық ... ... ... ... ... прграммлық типтерді Турбо Паскальда жазылған ... ... Windows ... ... ... және басқа тілдермен ( Ас-
семблер, Си т.б) жұмыс істеу ... ... .1. ... ... ... ... ... типтегі String жолдары байттардан
тұрады. Олар жолдағы символдық ... және ... ... . Паскальдағы жолдардың максимальдық ұзындығы 255 символға тең.
Соны- мен Пaскальдағы жолдар ... 1 ден 256 ... орын ... ... ... ... ... болмайды. Қарапайым
жолдардан айырмашылығы NULL(#0) символындағы нол емес ... ... ... ... ... ... шектеусіз, бі
рақ 16 разрядты архитектралық DOS және Windows 65535 ... ... ... ... ... типті PChar мен сипатталады.ол
PChar=^CHAR;
Көрсетіледі, бірақ кеңейтілген синтаксисті символдық массив типі ... OF ... ... ... ... мөлшерін анықтайтын оң саны ,
номен аяқталатын символдардың 0 кодын санамағанда . ... ... ... ... бар ... деп ... String ... айырмашылы- ғы
0 индексі бар символ жолдың бірінші символы болып табылады, ал х ин ... ... ... 0 кодымен аяқталатын символ .
2.2 . Кеңейтілген синтаксис
Нолмен аяқталатын жолдармкн жұмыс істеген кезде міндетті түрде кеңейтіл
ген синтаксисті қолдану ... , ... {$x+} ... ... ... ... ... стандартты типтегі PChar және нөлдік
ин дексі бар ... ... ... ... ... ... ты ... мынадай массивтермен қолданылуы мүмкін
Read,Readln жә- не Str,ал ... Write, ... ... ... ға ... және ... ... ретінде
де. Сонымен қатар кеней- тілген синтаксисте шақыру функциясы, шақыру
працедурасы ... ... Бұл ... ... егер оның ... мәні болмаса.
2.3.Символдық көрсеткіштер және жолдық тұрақтылар
Жолдық тұрақтыларға кеңейтілген синтаксисті PChar типін ... ... PChar ... жолдық тұрақтыны қосып алуға болады. Мысалы:
VAR
S: PChar;
……………
BEGIN
S:=’жолдық тұрақты’;
END;
Мұндай нәтижені қосып алу барысында көрсеткіштің мәні ... ... ... OF ... тұрақты’#0;
VAR
S:PChar;
………..
BEGIN
S:=@TmpStr;
END;
Параметрі жолдық тұрақты болғандықтан PChar типі процедурамен фар-
мальді параметрлі функциямен ... ... ... ... ... Str ... Str1 ... (*) символын іздейді. Қосып
алу процесіндегідей компилятор нолмен аяқталатын жолды ... мент тегі ... ... ... ... осы ... Str! ... Str Comp функциясына көшіреді.
Сонымен типтелген тұрақтымен инициализацияланады. Бұл структуралан
ған типке де келеді. ... PChar ... және ... ... ... ектілер үшін PChar өрісті қамтиды.
CONST
InputStr:PCHAR=’мәнді еңгізіңіз’
Months: ARRAY[1…..12], OF ... ... ... ... ‘шіл’, ‘там’, ‘қыр’, ‘қаз’, ... ‘же л ... ... барлық уақытта String жолдық типі ... ... ... тұрақты 255 символымен шектеледі.
2.4. Символдық көрсеткіштер және символдық ... ... ... ... ... ... массивті
PChar типімен біріктіреміз. PChar типін қолдан кезде символдық массив те
қолданылуы мүмкін. PChar типінің мәнімен бірге ... онда ... ... ... ... Мәні ... бірінші мәнмен сәйкес
келеді. Мысалы:
CONST
ARRAY[0…….10]OF CHAR=’ жол‘;
VAR
S:PChar;
BEGIN
S:=A;
WriteLn(A);
WriteLn(S);
END;
Қосып алу опраторы S массивтің бірінші элементі А-ны көрсетеді, сондық-
тан WriteLn сол ... екі рет ... ... ... аз ... тұрақтының көлемінен нөлдік ин-
дексті символдың массив типі бар иптелген ... ... ... ... NULL(#0) ... ... Массив нолмен аяқталатын
жолды толтырады:
TYPE
TBuffStr= ARRAY[0……….126] OF CHAR;
CONST
BuffStr:TBuffStr=’ буффер бос‘;
2.5. Символдық көрсеткіштің индексациясы
Кеңейтілген синтаксисті қолданған кезде нолдік ... ... ... ... ... ... ... көрсеткішті массив
элементі ретінде де индекстеуге болады.
VAR
A:ARRAY[0…10] OF CHAR;
S:PChar;
Ch:CHAR;
BEGIN
S:=A;
Ch:=A[2];
WriteLn(ch);
Ch:=S[2];
WriteLn(ch);
END;
Әрбір қосып ... Ch мәні ... ... ... А ... типін индекстеген кезде ... ... ... Array=ARRAY[0…65535] OF CHAR;
PChar=^TCharArray;
VAR
S:PChar;
Компилятор символдық көрсеткішті индекстегенде диапозонды тексермей-
ді, себебі онда нолмен аяқталатынжолдық максималдық ... ... ... ... ... ... жоқ. ... диопазонды тексе-
руді программист өзі орындау керек.
2.6. String модулдерінің функциялары
Турбо ... ... ... ... ... жұмыс істеу үшін функ-
ция құрылмаған. Мұндай функция Strings модулінде құрылған.
Таблица 1.1
|Функция | ... ... |Екі ... біріктіру ... |Екі ... ... ... ... ... ... |Динамикалық жадтан жолды жою ... ... ... ... ... жолды көшіру ... ... ... ... алу ... ... және қатардағы латын әріптерімен жазылмаған екі |
| ... ... ... |Бір ... ... ... ... көрсетілген символ санын |
| ... ... |Екі ... ... ... ... ... |
|StrLCopy |Бір ... ... ... ... ... ... ... |
| ... ... ... ... ... анықтау. ... ... және ... ... ... жазылмаған |
| ... ... екі ... ... ... ... ... жолдық әріптерді қайта өңдеу |
|StrMove ... ... ... ... ... ... ... жадтағы жолдарды алу ... |String ... ... ... ... ... ... өңдеу |
|StrPCopy |Нолмен аяқталатын ... String ... ... ... ... ... ... ішіндегі жолға кіруін іздейміз ... ... ... ... соңғы кіруін іздейміз ... ... ... ... бірінші кіруін іздейміз |
|StrUpper |Тіркелген жолдағы жолдық ... ... ... ... ... қайта өңдеу
Қарапайым типтегі String жолды бір ... ... ... екінші типте жолдың қайта өңдеу функциясы қарастырылған.
PChar типіндегі жолдарды String типіндегі жолға ... ... ... ция ... : PChar) : STRING
STRING типіндегі жолдары PChar типіндегі жолға қайта өңдеу үшін функ-
ция орындалады.
StrPCopy ( Dest : PChar; Sourct : STRING) : ... Source ... Pest ... ... ... және көрсеткішті
Pest– ке қайтарады. Сонымен қатар жолдан алынған ұзындықты тексеру орын
далмайды ... ... ... Pest жолы ... Length (Str)+1 сим
волына жеткілікті орын барына көз жеткізу керек .
Төмендегідей екі ... ... ... ... ... PChar ... ... қайта өңдеу)
USES Strings;
CONST.
Str 1 : STRING (10)= ‘STRING типі’
Str 2 : PChar = ‘ PChar типі’
VAR
s: STRING ... ARRAY (0… 10) of ... StrPas ... ... (p, ... (p);
END.
Қайта өңдеу функциясына тіркелген жолдағы жолдық әріптерді және керісі-
нше қосуға болады.
StrLower(str: PChar) : PChar
және
StrUpper (Str: PChar) : ... екі ... Str - ге ... екі ... да ... және StrUpper функцияларын қолдану}
USESS St rings
VAR
S : ARRAY (Q.20) of . CHAR.
BEGIN
Write (‘жолда енгізіңіз:’);
Readln(s);
Writeln (StrLower(s));
Writeln(StrUpper(s));
END.
2.8. Жолдардың ұзындығын анықтау
Жол ... ... үшін ... ... : PChar) : WORD.
Ол символдар санын Str ... ... ... ... ... ... ... Strings;
VAR
Write (‘жолды енгізіңіз’);
Readeln (s);
WriteLn (‘ жолдың ұзындығы: ‘StrLen(s));
END.
Сондай – ақ ... ... ... үшін мына ... ... End(Str : PChar) : PChar.
Функция көрсеткішті нолмен аяқталған символды жолға Str қайтарады. Мұн
дай процедураның ... ... ... ... ... ... ға
болады:
StrEnd функциясын қолдану.
USES Strings;
CONST
S : ARRAY (0…20) of CHAR=’Тестіленген жол’;
VAR
P: PChar;
St: STRINA (20);
i: BYTE;
BEGIN
WriteLn(‘Жолдардың ұзындығы:’ ,StrEnd(s)-s);
p:=s;
WHILE p ... ... p^=’ ‘THEN ... { Пробелды ‘!’ белгісімен
ауыстыру}
Inc(p); {Көрсеткішті үлкейту}
END;
St:StrPas(p); {Стандартты жолға қайта өңдеу}
WriteLn(s);
END;
2.9. Жолдарды көшіру
Жолдарды көшіру ... PChar): ... ... Source ... Dest жолына көшіреді және көрсет-
кіші Dest-ке қайтарады. Алынған ... ... ... ... Dest жолы үшін орын ... көз ... ... немесе StrLen(Sourcе)
+1 символына жеткілікті орын барын тексеру. StrCat функция сының ... ... ... функция MaxLen символын Source жолынан Dest жолына көшіреді жә ... ... ... Аналогтық функция StrLCat, егер көшіріл
ген жолдың ұзындығы MaxLen-нен кіші болса онда ... ... са- ... көшіру үшін SizeOf функциясын қолдануға болады
Төменде StrCopy және StrLCopy функцияларын қолдану мысалы келтрілген
{ функцияларды қолдану StrCopy және ... ... OF ... ... көшіру’);
WriteLn(s);
StrLCopy(s, ‘ жолдарды көшіру’ , 11);{тек бірінші сөзін}
WriteLn(s);
END.
StrCopy секілді ... ... ... ... ... болады, бірақ көрсеткішті
Dest-ке емес жолдың соңғы элементіне қайтарады. StrECopy ... ... тө ... ... функциянықолдану StrCopy}
USES Strings;
CONST
str1 =’көшіру’;
str2=’жол’;
VAR
s:ARRAY[0…..17] OF CHAR;
BEGIN
StrECopy(StrECopy(StrECopy(s,str1),’ ‘),str2);
WriteLn(s);
END.
Егер бұл сан Sours ... ұзын ... және ... ... ... Count ... Source жолынан Dest жолына көшіретін функция бөліне-
ді:
StrMove(Dest,Source:PChar;Count:WORD):PChar
Сонымен қатар осы жол жадыда ... StrMove ... ... ... OF CHAR=’жолдарды көшіру’;
VAR
p:PChar;
BEGIN
WriteLn(a);
p:=@a[12];
StrMove(a,p,17);{‘жол’ көшірілетін болады}
WriteLn(a);{қалған бөлігі #0 символымен толтырылады}
END.
2.10.Жолдарды біріктіру
Жолдарды біріктіру мына функциямен орындалады:
StrCat(Dest,Source:PChar):PChar
StrCat функцчясы Source ... ... Dest ... ... көрсеткішті Dest-ке қайтарады. Алынған жолдың ұзындын тексеру
орындалмайды. Буферде Dest жолы үшін орын ... көз ... ... ... ... ... ... орын барын тексе
ру. Жолдың ұзындығын тексеру мына ... ... ... StrCat секілді жұмыс ... ... ... Dest
жолы MaxLen символынан тұрады. Сәйкесінше Source ... ... ... көшіріледі. Егер Source жолының ұзындығы осы
мәнненкіші болса онда нақты символдар ... MaxLen ... үшін SizeOf ... ... ... болады.
Төменде StrCat және StrLCat функцияларын пайдалану көрсетілген.
{ жолдарды біріктіруді ... ... OF CHAR =’ ... ... ... ... ... ( p,a);
WriteLn (StrPas( p ));
StrCopy (p, ‘ бұл ‘);
StrCat(p,a, 20-SizeOf(p));
{ алынған жолдың ұзындығы 16 тең}
WriteLn(StrPas(p));
END.
2.11. Жолдарды салыстыру
Екі жолды ... үшін ... екі типі ... ... ... ажырататын және ажыратпайтын функциялар. Барлық
функциялар нолден кіші ... ... егер ... ... ... егер жолдар тең және мәні нолден үлкен, егер бірінші
жол екіншісінен ... ... ... ... солдан оңға қарай
кодтардың символын ... ... ... ... ... функция біріншінің MaxLen символының екі жолын салыстырады. Егер
жолдың ұзындығы MaxLen кіші болса, онда ... саны ... ... ... ... функциясы StrLComp функциясына аналогты болады, бірақ
жолдық және ... ... ... ажыратпайды.
Төменде төрт процедураны қолдану мысалы келтірілген:
{ жолдарды салыстыру функцияларын қолдану }
USES Strings;
VAR
Str1,Str2:ARRAY[0….20] OF ... ... ... {егер жолдар тең болса}
WriteLn(‘тең’)
IF StrComp(Str1,Str2,3)=0 THEN
WriteLn(‘дұрыстығын тексеру’);
END
ELSE{ тең болмаса}
IF StrLIComp(str1,str2,3)=0 THEN
BEGIN
WriteLn(‘бірінші 3 символы ... ... ... енді тең емес’);
END
END.
2.12. Жолдарды көшіру
Жолдың ішіндегі жолды іздеу функциясы:
StrPos(Str1,Str2:PChar):Pchar
Функция көрсеткішті бірініші ... ... ... str2-ден str1
жолына немесе NIL ... ... ... ... ... ... StrScan символдың жолға кіруін ... ал ... ... ... символ NULL(#0) жолдың бір бөлігі ... ... ... – StrPos ... процедураларды орындауға мысал келтіреміз :
{ жолдарды көшіру}
USES ... ... OF CHAR = ... ... ’ / ‘ ;
VAR
s1,s2:ARRAY[0…20] OF CHAR;
BEGIN
ReadLn(s1);
StrCopy(s2,StrPos(s1,str1));
WriteLn(s2);
StrCpoy(s2,StrScan(S1,str2));
WriteLn(s2);
StrCopy(s2,StrRScan(s1,str2));
WruteLn(s2);
END.
2.13.Динамикалық ... ... ... ... жолдарды алу функциясы :
StrNew ( Str:PChar):PChar
Функция динамикалық ... Str ... ... ... және көр-
сеткішті жаңа жолға қайтарады. Егер Str тең NIL-ге немесе ... ... ... , онда StrNew функциясы NIL- ді қайтарады және жадты бөлмейді.
Жолды жадтан жою үшін :
1StrDispose(Str:PChar)
Функция сол ... ... ала ... StrNew ... ... жолын жояды. Егер Str функциясы NIL- ге тең болса онда ... ... ... ... ... ... қарасытырылса да , ол ешқандай нәтиже қайтар
майды және процедура болып саналады. Сондықтан оны кеңейтілген ... ... ... ... {$X+} бірге қолдану керек .
Төменде осы процедураны қолдану мысалы келтірілген:
{ динамикалық жадтағы жолдарды алу}
USES ... ... OF ... ( ... ... (s); {жадтың бөлінуі}
WriteLn (‘ жадтағы жол :’,p) ;
StrDispose (p); { жадтан жою}
END.
1{ жолдарды салыстыру функцияларын қолдану }
USES Strings;
VAR
Str1,Str2:ARRAY[0….20] OF ... ... ... {егер жолдар тең болса}
WriteLn(‘тең’)
IF StrComp(Str1,Str2,3)=0 THEN
WriteLn(‘дұрыстығын тексеру’);
END
ELSE{ тең болмаса}
IF StrLIComp(str1,str2,3)=0 THEN
BEGIN
WriteLn(‘бірінші 3 символы тең’);
IF StrLComp(Str1,StrUpper(Str2),3)) ... енді тең ... ... ... ... ... ... OF CHAR =’ жолдарды біріктіру ‘;
VAR
p:PChar;
s:STRING;
BEGIN
StrCopy(p, ‘бұл ‘);
StrCat ( p,a);
WriteLn (StrPas( p ));
StrCopy (p, ‘ бұл ‘);
StrCat(p,a, ... ... ... ... 16 ... типіндегі жолдарды PChar типіндегі жолға қайта өңдеу)
USES Strings;
CONST.
Str 1 : STRING (10)= ... ... 2 : PChar = ‘ PChar ... STRING (10);
p: ARRAY (0… 10) of CHAR;
BEGIN
s: StrPas (str2);
Writeln (s);
StrPCopy (p, str1);
Writeln ... ... ... ... ... құру ... tring [30];
Var
t2 : S;
i,j,k,n : integer;
Begin
Read (t2); n: Leng th (t2); K: = 0;
For I : = 1 to n – K ... t2 [i] = t2 [j] ... ( ... K+1;
End;
Else j : j+1:
If j : n- K then delete ... ... ... ... ... жолдар, кеңейтілген
синтаксис , символдық көрсеткіштер және жолдық тұрақтылар , ... ... ... жолдарды көшіру керектігін, жолдарды
біріктіруді, жолдарды ... ... ...

Пән: Информатика
Жұмыс түрі: Материал
Көлемі: 10 бет
Бұл жұмыстың бағасы: 500 теңге









Ұқсас жұмыстар
Тақырыб Бет саны
Turbo Paskal-да символдық ақпаратты өңдеу19 бет
«Турбо паскаль жүйесінде бір өлшемді массивтерді ұйымдастыру технологиясы»25 бет
Алгоритмдерді Паскаль программалау тілінде әзірлеу10 бет
Бейсик және Паскаль тiлдерiнде программа құру ерекшелiктерi23 бет
Орта мектепте Паскаль программалау тілін оқытуды жетілдіру жолдары55 бет
Орта мектептегі паскаль тілі программасын оқытудың әдістемелік ерекшеліктері61 бет
Паскаль жүйесіндегі графика24 бет
Паскаль және Си тілінде есеп жығару17 бет
Паскаль және Си тілдері22 бет
Паскаль програмалау тілі туралы түсінік29 бет


Исходниктер
Пәндер
Көмек / Помощь
Арайлым
Біз міндетті түрде жауап береміз!
Мы обязательно ответим!
Жіберу / Отправить


Зарабатывайте вместе с нами

Рахмет!
Хабарлама жіберілді. / Сообщение отправлено.

Сіз үшін аптасына 5 күн жұмыс істейміз.
Жұмыс уақыты 09:00 - 18:00

Мы работаем для Вас 5 дней в неделю.
Время работы 09:00 - 18:00

Email: info@stud.kz

Phone: 777 614 50 20
Жабу / Закрыть

Көмек / Помощь