Millised allolevatest protseduuridest on valed (süntaksivead) või ei tagasta leitud väärtust peaprotseduurile?

Question

Answer

Function ristkylik(a, b) 
 Dim pindala, ymbermõõt 
 pindala = a * b 
 ymbermõõt = 2 * (a + b) 
 End Function

Answer

Function ruut() 
 arv = Val(InputBox("Sisesta arv")) 
 ruut = arv ^ 2 
 End Function

Answer

Sub liida(a, b) 
 liida = a + b 
 End Sub

Answer

Function summa(a, b) 
 summa = a + b 
 End Function

Crowdly