10-01-2022, 10:16 PM
(This post was last modified: 10-01-2022, 10:17 PM by Kernelpanic.)
Pete, what you gave as an example is an Excel function. Or am I wrong?
"You can use the Excel LOG10 function to find the base 10 logarithm of a number. For example, =LOG10(100) returns 2 and =LOG10(1000) returns 3." - That is correct.
Oh, now I can't see through it anymore. This is mayhem!
And this is the result with the Log-Function in QBasic64:
"You can use the Excel LOG10 function to find the base 10 logarithm of a number. For example, =LOG10(100) returns 2 and =LOG10(1000) returns 3." - That is correct.
Oh, now I can't see through it anymore. This is mayhem!
And this is the result with the Log-Function in QBasic64:
Code: (Select All)
'Logarithmusuebung mit "Log" - 1. Okt. 2022
Option _Explicit
Declare Function LogX(wert As Double) As Long
Dim As Double wert
Dim As Integer i
Input "Log(i): ", i
For i = 1 To i
wert = Log(i)
Print Using "####.#####"; wert
Next
Print
'Log(100)
Print Using "Log: ####.##### -- From: MS QBasic - Programmer's Guide"; Log(100)
End 'Programm
Function LogX (value As Double) Static
Dim ergebnis As Double
ergebnis = Log(value) / Log(10)
LogX = ergebnis
End Function