Modulinos: Difference between revisions
Content added Content deleted
(Added AppleScript.) |
(Modulinos en FreeBASIC) |
||
Line 597: | Line 597: | ||
cr .( Why aren't you running this as a script? It only provides a constant.)</lang> |
cr .( Why aren't you running this as a script? It only provides a constant.)</lang> |
||
=={{header|FreeBASIC}}== |
|||
{{trans|Ring}} |
|||
<lang freebasic> |
|||
Function meaningoflife() As Byte |
|||
Dim As Byte y = 42 |
|||
Return y |
|||
End Function |
|||
Sub main() |
|||
Print "Main: The meaning of life is "; meaningoflife() |
|||
End Sub |
|||
main() |
|||
Sleep |
|||
</lang> |
|||
{{out}} |
|||
<pre> |
|||
Main: The meaning of life is 42 |
|||
</pre> |
|||
=={{header|Go}}== |
=={{header|Go}}== |