> world 58 26 Mida see programm küll teha võiks? ;-) Korraliku vormistamise eesmärgiks on keele enda vahenditega kirjutada hästi loetav programm. Kui on vaja selgitada kasutatava algoritmi sisu- lisi nüansse, siis selleks kasutatakse kommentaare. Paljusid lihtsaid algoritme võib protseduuriks või funktsiooniks vormida ilma sõnagi kommentaariks lisamata. { N ä i d e N10.2 } Type Arvujada = Array[1..100] of Integer; Function ArvujadaSumma ( Jada : Arvujada; LiikmeteArv : Integer ) : LongInt; Var Summa : Longint; Indeks : Integer; Begin Programmeerimise algkursus 79 - 89 If LiikmeteArv > 100 Then LiikmeteArv = 100; Summa := 0; For Indeks := 1 To LiikmeteArv Do Summa := Summa + Jada[Indeks]; ArvujadaSumma := Summa; End; Mis teeb ühe programmi hästi loetavaks? Selle kohta võib leida mitmeid soovitusi:
> world 58 26 Mida see programm küll teha võiks? ;-) Korraliku vormistamise eesmärgiks on keele enda vahenditega kirjutada hästi loetav programm. Kui on vaja selgitada kasutatava algoritmi sisu- lisi nüansse, siis selleks kasutatakse kommentaare. Paljusid lihtsaid algoritme võib protseduuriks või funktsiooniks vormida ilma sõnagi kommentaariks lisamata. { N ä i d e N10.2 } Type Arvujada = Array[1..100] of Integer; Function ArvujadaSumma ( Jada : Arvujada; LiikmeteArv : Integer ) 102 / 115 : LongInt; Var Summa : Longint; Indeks : Integer; Begin If LiikmeteArv > 100 Then LiikmeteArv = 100; Summa := 0; For Indeks := 1 To LiikmeteArv Do Summa := Summa + Jada[Indeks]; ArvujadaSumma := Summa; End; Mis teeb ühe programmi hästi loetavaks? Selle kohta võib leida mitmeid soovitusi:
annaabi.ee 
