Delphi тіліндегі бағдарламалардың құрылымы

="justify">function sum (m:massiv;k:integer):integer;

  var

    nat:integer;

begin

   nat:=0;

for i:=l to k do

nat:=+m[i]:

sum:=not;

end;

  begin

fori:=lto 7 do

mass[i]:=i+5;

s:=sum(mass, 7);

memo 1. Lines.Add(Inttostr(s));

end;

4.Іске қосу командасын орындау. Ол Run мәзірінің Run пункті арқылы немесе F9 пернесін басу арқылы іске асыруға болады.

5."Қосынды"батырмасын  басу.

Ішкі  программа өзін-өзі шақыра алады, Object Pascal-да оны басқаша рекурсивті ішкі программа деп атайды. Рекурсивті ішкі программаға мысал көрсетейік.

4-есеп. Факториалды есептеу. Факториалды есептеуге функция жазу. Негізгі программада енгізу (Editl) өрісінен санды алып, функцияны шақыру және алынған нәтижені Memol өрісіне шығарады.

        Есептің шығарылуы.

1.Формаға  енгізу үшін Editl өрісін, нәтижені шығару үшін Memol компонентін және функция денесін жазуға Buttonl компонентін орналастырып, қасиеттерінің мәндерін қойып шығу.

2." Есептеу"  батырмасын екі рет басып, программа  код терезесіне өту. Сонда   OnClick оқиғасы процедурасының дайындамасы шығады.

3.Программа  модулін жазу:

    Procedure TForm 1.Button 1 Click (Sender:

   TObject);

Var

n:byte;

function fac(n:byte)-.extended;

var nat:extended:

begin

if n in [0...]J then nat:=l

                            else nat:=n*fac(n-l);

fac:-nat;

end;

  begin

n:=Stri!nt(Editl.text);

Memo 1. Unes..Add(FloattoStr(fac(n)));

End;

end

                                                    
 
 
 
 
 
 
 
 
 
 

                                                   Қорытынды

  Delphi – ортасы программист жұмысының өте жоғары тиімділігін қамтамасыз ететін орта.

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

  Қазіргі  заман талабына сай компьютерлік  саясатты өте тиімді. Өйткені  қандай да болса да жұмыс  орны компьютерсіз жұмыс атқара  алмайды. Ал оны оқып үйрену  инемен құдық қазғандай. Дербес  компьютерде жұмыс істей білу  бұл болашақта кез келген жұмысты  орындай алу мүмкіндігін береді. Қазіргі таңда көп программалардың  шығуына байланысты көп мұқияттылықты  талап етеді. Бұл программистердің  басты мақсаты.

  Ақпараттық  коммуникациялық технологиялардың  қарқынмен дамып, күнделікті тұрмысқа  енуіне байланысты соңғы кездері  программалауға деген қызығушылықтың  арта түскені белгілі. Қазіргі  уақытта компьютерсіз қандай  да бір жұмысты орындауды көз  алдымызға елестету қиын. Бұл  компьютермен жұмыс істейтін  адамға қандайда бір ұмтылысты  тудыруды мүмкін. 
 

                       
 
 
 
 
 
 

                           Пайдаланылған әдебиеттер 

1. Электронный учебник. 32 урока по Delphi.
2. А.Архангельский., М.Тагин. Разработка по Delphi.
3. Справочное руководство по Delphi 4.
4. Информатика негіздері. Журнал.
5. М.Фленов. Библия Delphi. Санкт-Петербург, 2004
6. Орлик С.В Секреты Delphi на примерах. М.Бином, 1996.