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



Pdf көрінісі
бет49/122
Дата27.03.2022
өлшемі1,24 Mb.
#28970
түріПрограмма
1   ...   45   46   47   48   49   50   51   52   ...   122
    Бұл бет үшін навигация:
  • End;
                      End; 

{енгізілген элементтерді матрица ретінде құру және экранға шығару} 

k:=0; 

for i:=1 to n do 

for j:=1 to n do 

           begin s[I,j]:=StrToFloat(Memo1.Lines[k]); 

                Stringgrid1.Cells[I,j]:=‘ ‗+Memo1.Lines[k]; k:=k+1; 



          End; 

{топ студенттерінің орташа жылдамдықтарын анықтау} 



for i:=1 to n do 

           begin for j:=1 to n do p[j]:=p[j]+s[j,i]; end; 



           for i:=1 to n do 

           Stringgrid1.Cells[I,n+1]:=‘ ‗FloatToStrF(p[i]/n,ffGeneral,4,2); 

{бірінші орынға қай топ шыққанын анықтау} 

min:=p[1]; nomer:=1; 



for i:=1 to n do 

if p[i]< min then 

             begin min:=p[i]; nomer:=I; end; 

nomerT:=IntToStr(nomer); Label1.Font.Size:=10; 

Label1.Caption:=‘1-орынға‘+nomerT+‘-топ шыққан‘+#13+#13+‘ 

                  Орташа жылдамдығы:‘+FloatToStrF(min/n,ffGeneral,4.2); 



End;  

4.  Жобаны  сақтап,  іске  қосу.  Форма  кӛрінеді.  Memo1  терезесіне  топтар  кӛрсеткіштерін  кезекпен 

енгізіп, OK батырмасын шерту. Нәтиже алынады (4-сурет). 

Ескерту.  StringGrid  компонентін  пайдаланбай,  мәндері  InputBox  терезесіне  енгізіп,  нәтижені  Label 

ӛрістеріне шығару да мүмкін. 

 

6 дәрістің тақырыбы:     Символдар мен жолдар. 




 

31 


 

Жоспар: 


 

Жолдық мәліметтер.  



 

Жолдық ӛрнектер.  



 

Жолдық функциялар мен процедуралар.  



 

Символдық мәліметтерді ӛңдеудің есептерін программалау. 



 

Object Pascal  тілінде жалпы мәтіндерді ӛңдеуде  жолдардың келесі түрлері қолданылады:  

 

Қысқа жол  - ShortString немесе  String[N], мұнда  N<255; 



 

Ұзын жол  - String; 



 

Алшақ жол  - WideString



 

Нӛл  -  терминалдық жол  -  PChar. 



Жолдар  программада ұзындығы  айнымалы, мысалы String[N]  - дегі элементтер саны 0 - ден N - 

ге дейн, ал String  және Pchar түріндегі шамалардың ұзындығы 0 байттан  2 Гбайтқа дейн болып ӛзгере 

алатын,  бір ӛлшемді массив тәріздес болып келеді.  

Түрлермен  танысуды  ShortString  -  жолдық  түрдегі  шамалармен  бастаймыз  (стандартты  Pascal  - 

дағы String[255] түрі). Бұл түр  арқылы  әр байты бір символдан тұратын жадының айнымалы аймағын 

анықтайды.  Object  Pascal  тілінде  символдық  түріндегі  шамалар  Char    арқылы  анықталады  және  әр 

символдың жолдағы ӛз нӛмірі болады.  

Delphi  ортасының  32  -  разрядтық  нұсқаларында  жоғарыдағы  екі  түрдің  тиімділігін  үйлестіретін  

жаңа  String  түрі    анықталған.    Осындай  түрдегі  анықталған  шамаға  жадыдағы  орын  динамикалық 

тәртіпте, яғни  қажеттілікке сай бӛлінеді және жолдың ұзындығы жадының қол жетерлік кеңістігімен 

байланысты болады.  

OLE - үрдістеріне негізделген компоненттерімен тіркестіру үшін Delphi – 32 - де WideString деген 

стандартты түр анықталған. Түрдің қасиеттері  String ұзын жолдың қасиеттері сияқты, бірақ әр таңбаны 

ӛрнектеуде  бір  емес, екі  разряд қолданылады. 



PСhar    түріндегі  анықталған  айнымалымен  жұмыс  атқару  жоғарыдағы  келтірілген  іс-әрекеттер 

сияқты  болып  келеді  және  компилятор  осы  айнымалыны  сілтеме  деп  санайды,  оған  4  байт  орын 

бӛледі.  



Достарыңызбен бөлісу:
1   ...   45   46   47   48   49   50   51   52   ...   122




©emirsaba.org 2024
әкімшілігінің қараңыз

    Басты бет