Algoritmizace a programování | |
Příklad na podprogramy |
Zkuste se na základě stávajícíh znalostí zamyslet, který podprogram vrátí jako svůj výsledek obsah kruhu:
Sub vypoctiObsahKruhu(polomer As Integer) ' tenhle podprogram je určitě správně :o) vypoctiObsahKruhu = 3.14 * polomer * polomer End Sub |
|
Function vypoctiObsahKruhu(polomer As Integer) ' tenhle podprogram je určitě správně :o) vypoctiObsahKruhu = 3.14 * polomer * polomer End Function |
|
Sub vypoctiObsahKruhu(polomer As Integer) ' tenhle podprogram je určitě správně :o) vysledek = polomer * polomer End Sub |
|
Function vypoctiObsahKruhu(polomer As Integer) ' tenhle podprogram je určitě správně :o) vysledek = 3.14 * polomer * polomer End Function |
|
Upřesnění k funkcím: Dosud jsme sice správně přiřazovali typ k proměnným, je však také třeba přiřazovat typ k návratové hodnotě funkce to se provede tak, že se za pojmenování fukce napíše As Typ. Tedy ve zde uvedeném případě Function vypoctiObsahKruhu(polomer As Integer) As Double.