AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Projekte Rechenprogramm
Thema durchsuchen
Ansicht
Themen-Optionen

Rechenprogramm

Ein Thema von Amateurprofi · begonnen am 31. Mai 2009 · letzter Beitrag vom 7. Okt 2020
Antwort Antwort
Seite 3 von 10     123 45     Letzte »    
Amateurprofi
Registriert seit: 17. Nov 2005
Neue Version vom 06.10.2020 (Version 3.4.1.1)
Info hierzu weiter unten in #91

Neue Version vom 26.09.2020 (Version 3.3.3.1)
Info hierzu weiter unten in #74

Neue Version vom 16.04.2018 (Version 3.3.2.1)
Info hierzu weiter unten in #73

Neue Version vom 12.04.2018 (Version 3.3.1.1)
Was neu ist siehe #60 weiter unten.

Neue Version vom 12.04.2018 (Version 3.2.1.1)
Was neu ist siehe letzter Beitrag weiter unten.

Neue Version vom 13.07.2010 (Version 2.3.1.1)
Was neu ist siehe letzter Beitrag weiter unten.

Neue Version vom 27.02.2010
Hochgeladen wegen eines Hinweises auf einen Bug (Siehe # 50)
Was alles neu ist : Siehe #51
Achtung, ich hab das jetzt nur wegen des Bugs hochgeladen.
Einige Teile des Programms befinden sich in einer Änderungsphase, und es ist mit Fehlern zu rechnen.
Die Teile, die bisher funktionierten sollten davon aber nicht betroffen sein.




Neue Version vom 28.07.2009

Vielleicht kann der oder die eine oder andere etwas mit anhängendem Rechenprogramm anfangen.
Das Hauptfenster enthält zwei Textfenster. In das rechte können numerische Ausdrücke eingegeben werden, im anderen werden die Ergebnisse ausgegeben.
Die Auswertung der Ausdrücke erfolgt immer dann, wenn im rechten Textfenster etwas geändert wird.
Das Programm kennt die gängigen Rechenoperatoren und Funktionen und etwas mehr.
Zum Beispiel werden Ein-/Ausgabe in unterschiedlichen Zahlensystemen, das Rechnen mit Datums- und Zeitangaben und mit Brüchen unterstützt.
Wer das Programm ausprobieren möchte, sollte nach dem ersten Start des Programmes mit Menu > Hilfe > Einführung auswählen. Ein (zugegebenermaßen simpel gestricktes) Tutorial gibt einen Einblick. Ausführlichere Infos können dem Helpfile, der mit Menu > Hilfe > Hilfe aufgerufen wird, entnommen werden.


Zahlen können ein- und ausgegeben werden als
Dezimalzahl, z.B. 2009, 3.14, 1.5e3
Hexzahl, z.B. $7D9 = Dezimal 2009
Binärzahl, z.B. "11111011001 = Dezimal 2009
Zahl mit anderer Basis, z.B. #8#3731 = Dezimal 2009
Römische Zahl, z.B. 'MMIX = Dezimal 2009
Datum, z.B. 10.5.2009 = 10. Mai 2009
Uhrzeit, z.B. 11:55:00 = Fünf vor 12
Datum + Uhrzeit, z.B. 10.5.2009 11:55:00
Kalenderwoche, z.B. wk19/2009
Bruch, z.B. 3//4 oder _3/4 = Dezimal 0.75
Winkel, z.B. 45°10'
Positionsangabe, z.B. 53°34'02.12"N, 10°01'20.24"E = Eine Position in Hamburg
Speicherauszug, z.B. ?00 00 00 00 00 00 20 FB 09 40 = Dezimal 2009

Als Operatoren sind z.Z. implementiert

Dyadische Operatoren, die zwischen 2 Werten stehen
Grundrechenarten
+, -, *, /
Erweiterte Grundrechenarten
\, Div Dividieren mit Integer-Resultat
|, Mod Modulo mit reellem Resultat
\\, IDiv Integer Division mit Integer-Resultat
||, IMod Modulo aus Integer Division
\*, DivMul Integer Division mit anschließender Multiplikation
^ Potenzieren
Logische- / Boolesche Operatoren
And, Or, Xor, Nand, Nor, Xnor
Vergleichs Operatoren mit Vergleichtoleranz
<, <=, =, <>, >=, >
Vergleichs Operatoren ohne Vergleichtoleranz
<< Kleiner
<== Kleiner oder identisch
== Identisch
<>> Nicht identisch
>== Größer oder identisch
>> Größer
Bitverschiebungs Operatoren
Shl, Shr, Rol, Ror
Bit-orientierte Operatoren
Bts Bit = 1 setzen
Btr Bit = 0 setzen
Btc Bit "umdrehen"
Btt Bit testen

Monadische Operatoren, die vor einem Wert stehen
- Vorzeichen bzw. Negation
+ Nur der Vollständigkeit halber
Not Boolesche / Bitweise Negation

Monadische Operatoren, die hinter einem Wert stehen
² Quadrieren
³ Dritte Potenz
° Umrechnung von Grad in Rad (Bogenmaß)
°° Umrechnung von Rad (Bogenmaß) in Grad
! Fakultät
€ Umrechnung von Euro in DM
€€ Umrechnung von DM in Euro
' Extrahieren des Exponenten

Als Funktionen sind zur Zeit implementiert
Standardfunktionen
Abs(v) Absolutwert
Sqr(v) Quadrat
Sqrt(v) Quadratwurzel
Winkelfunktionen
Sin(v) Sinus
Cos(v) Kosinus
Tan(v) Tangens
Cot(v) Kotangens
Sec(v) Sekans
Csc(v) Kosekans
SinH(v) Sinus Hyperbolicus
CosH(v) Kosinus Hyperbolicus
TanH(v) Tangens Hyperbolicus
CotH(v) Kotangens Hyperbolicus
SecH(v) Sekans Hyperbolicus
CscH(v) Kosekans Hyperbolicus
ArcSin(v) ArcusSinus
ArcCos(v) ArcusKosinus
ArcTan(v) ArcusTangens
ArcCot(v) ArcusCotangens
ArcSec(v) ArcusSekans
ArcCsc(v) ArcusCosekans
ArcSinH(v) AreaSinus Hyperbolicus
ArcCosH(v) AreaKosinus Hyperbolicus
ArcTanH(v) AreaTangens Hyperbolicus
ArcCotH(v) AreaCotangens Hyperbolicus
ArcSecH(v) AreaSekans Hyperbolicus
ArcCscH(v) AreaCosekans Hyperbolicus
RadToDeg(v) Bogenmaß in Grad umrechen
RadToGon(v) Bogenmaß in Gon umrechen
RadToCycle(v) Bogenmaß in Cycles umrechen
DegToRad(v) Grad in Bogenmaß umrechnen
DegToGon(v) Grad in Gon umrechnen
DegToCycle(v) Grad in Cycles umrechnen
GonToRad(v) Gon in Bogenmaß umrechnen
GonToDeg(v) Gon in Grad umrechnen
GonToCycle(v) Gon in Cycles umrechnen
CycleToRad(v) Cycles in Bogenmaß umrechnen
CycleToDeg(v) Cycles in Grad umrechnen
CycleToGon(v) Cycles in Gon umrechnen
Logarithmische und exponentielle Funktionen
Ln(v) Natürlicher Logarithmus
Lg(v) Dekadischer Logarithmus
Log10(v) Dekadischer Logarithmus
Log2(v) Dualer Logarithmus
LogN(base,v) Logarithmus zu beliebiger Basis
ALn(v) Umkehrung des natürlichen Logarithmus
ALg(v) Umkehrung des dekadischen Logarithmus
ALog10(v) Umkehrung des dekadischen Logarithmus
ALog2(v) Umkehrung des dualen Logarithmus
ALogN(base,v) Umkehrung des Logarithmus zu beliebiger Basis
Root(x, y) Yte Wurzel aus x
Power(x, y) Yte Potenz von x
Exp(v) Vte Potenz von e
ExpMod(b, e, m) Modulo einer Potenz (=(b ^ e) Mod m)
Exponent(v) Exponent eines reellen Wertes
Rundungsfunktionen
Int(v) Integerwert
Trunc(v) Nachkommateil entfernen
Frac(v) Nackkommateil
Round(v) Runden
Floor(v) Abrunden
Ceil(v) Aufrunden
Bitorientierte Funktionen
BTL(v, len) Unterstes gesetztes Bit
BTH(v, len) Höchstes gesetztes Bit
BTN(v, len) Anzahl gesetzter Bits
BTP(v, len) BitParität
Kalender-, Datums- und Zeitfunktionen
HDay(name,year) Datum eines Feiertages in einem Jahr
Easter(year) Datum des Ostersonntags
Advent(year) Datum des Ersten Advent
Time(hh, mm, ss) Zeit
Date(y, m, d) Datum
DT(y, m, d, hh, mm, ss) Datum und Zeit
Today Aktuelles Datum
Now Aktuelles Datum mit aktueller Zeit
Secs(v) Umrechnung in Sekunden
Mins(v) Umrechnung in Minuten
Hours(v) Umrechnung in Stunden
Days(v) Umrechnung in Tage
Weeks(v) Umrechnung in Wochen
Months(v) Umrechnung in Monate
Years(v) Umrechnung in Jahre
Julian(v) Nummer des Tages im Jahr
JD(v) Julianisches Datum
JDtoGreg(v) Gregorianisches Datum
Entfernungsberechnung
GeoDist(p1,p2,r,f) Entfernung zwischen 2 Orten
GeoPath(Liste) Summe von Entfernungen zwischen Orten
GeoPos(w1, w2) Positionsangabe aus 2 Winkeln erstellen
Latitude(p) Breitengrad aus Positionsangabe extrahieren
Longitude(p) Längengrad aus Positionsangabe extrahieren
Sonstiges
Min(Liste) Minimum
Max(Liste) Maximum
Sum(Liste) Summe
Avg(Liste) Mittelwert
Mul(Liste) Produkt
QSum(Liste) Summe von Quadraten
LCD(Liste) Größter gemeinsamer Teiler
SCM(Liste) Kleinstes gemeinsames Vielfaches
Frc(v) Dezimalzahl in Bruch wandeln
Combis(N, K, r) Anzahl Kombinationen
Varis(N, K, r) Anzahl Variationen
NK(N, K) N über K (Anzahl Kombinationen)
HGV(N, K, r, z, p) Hypergeometrische Verteilung
HGVX(N, K, g, r, p) Hypergeometrische Verteilung
Encode((Liste),Liste) Verschlüsseln
Cvt( v, from, to ) Maßeinheiten umrechnen
Convert( v, from, to ) Maßeinheiten umrechnen
Bmi( v1, v2) Body-Mass-Index
Angehängte Dateien
Dateityp: zip Calculator 3.3.1.1.zip (1,50 MB, 24x aufgerufen)
Dateityp: zip Calculator 3.3.2.1.zip (2,07 MB, 28x aufgerufen)
Dateityp: zip Calculator 3.3.3.1.zip (2,09 MB, 27x aufgerufen)
Dateityp: zip Calculator_3.4.1.1.zip (1,60 MB, 22x aufgerufen)
Gruß, Klaus
Die Titanic wurde von Profis gebaut,
die Arche Noah von einem Amateur.
... Und dieser Beitrag vom Amateurprofi....

Geändert von Amateurprofi ( 6. Okt 2020 um 02:45 Uhr) Grund: Fehler behoben
 
Benutzerbild von kroimon
kroimon

 
RAD-Studio 2010 Arc
 
#21
  Alt 2. Jun 2009, 21:03
Wow wirklich geniales Tool, könnte unter Umständen sogar den sonst von mir verwendeten Google Calculator ersetzen
Wenns jetzt noch Open Source wäre - hehe... 8)

Zitat von Amateurprofi:
Zitat von himitsu:
Ich hab jetzt nicht sowas gefunden, aber zu dem Zwischenergebnis, da wäre es noch schön, wenn man einfach sagen könnte "hier Ergebnis aus Zeile X".?
Das hatte ich bereits implementiert, dann aber wieder rausgenommen.
Der Grund ist, daß der Teil, der die Ausdrücke auswertet keinerlei Zugriff auf das Hauptprogramm hat, bzw. nicht haben soll, weil er auch für andere Anwendungen verwendbar sein soll.
Das könntest du doch über ein Callback lösen, das unbekannte Variablen/Funktionen von der GUI holt... Damit könntest du sowohl Ans als auch Ans(x) [x = Zeilennummer] realisieren...
So macht das mein eigener (viiiel schlichterer) TMathParser...


Edit:
Zitat von Jakob Ullmann:
[OT] [size] funktioniert nicht mit allen Größen, hehe. [/OT]
Hehe... und die Vorschau gibts nich umsonst Fixed...
~Stefan
  Mit Zitat antworten Zitat
Benutzerbild von Jakob Ullmann
Jakob Ullmann

 
Lazarus
 
#22
  Alt 2. Jun 2009, 21:28
[OT] [size] funktioniert nicht mit allen Größen, hehe. [/OT]
Jakob
  Mit Zitat antworten Zitat
Benutzerbild von Corpsman
Corpsman

 
Delphi XE2 Professional
 
#23
  Alt 3. Jun 2009, 07:15
so nach einer gewissen Zeit hab ich mir den Thread noch mal angeschaut, dachte evtl gibts schon ne neue version.

Also hab ich dein Progrämchen gestartet um die Aktuelle Versionsnummer zu suchen, auf das ich sie dann vergleichen kann.

Nur ist diese nicht auffindbar gewesen ...

Kann es sein das du vergessen hast deinem Programm eine Versionsnummer zu verpassen ?


Und dann hab ich noch versucht Komplexe Zahlen zu testen, die gibt es anscheinend leider auch nicht, oder ich hab sie nur falshc geschrieben ?

also etwas der Form

5+ 4*i
Uwe
  Mit Zitat antworten Zitat
Amateurprofi

 
Delphi XE2 Professional
 
#24
  Alt 3. Jun 2009, 08:17
Zitat von Jakob Ullmann:
[OT] [size] funktioniert nicht mit allen Größen, hehe. :mrgreen: [/OT]
Verstehe nicht, was du meinst. Könntest du bitte bitte etwas ausführlicher beschreiben, was nicht funktioniert ? Danke.
  Mit Zitat antworten Zitat
Amateurprofi

 
Delphi XE2 Professional
 
#25
  Alt 3. Jun 2009, 08:26
Zitat von Corpsman:
Also hab ich dein Progrämchen gestartet um die Aktuelle Versionsnummer zu suchen, auf das ich sie dann vergleichen kann.
Nur ist diese nicht auffindbar gewesen ...
Kann es sein das du vergessen hast deinem Programm eine Versionsnummer zu verpassen ?
Nein, das hab ich nicht vergessen, sondern ganz bewußt nicht gemacht. Brauch ich nicht, weil : Ich habe immer nur eine Version - die neueste.
Und die neueste Version hab ich noch nicht in die DP gestellt, weil ich auf Antwort vom Moderator warte, wie ich es anstellen kann, daß die neue Version im ersten Beitrag erscheint.

Zitat von Corpsman:
Und dann hab ich noch versucht Komplexe Zahlen zu testen, die gibt es anscheinend leider auch nicht, oder ich hab sie nur falshc geschrieben ?
also etwas der Form 5+ 4*i
Komplex Zahlen werden nicht unterstützt.
  Mit Zitat antworten Zitat
mkinzler

 
Delphi 11 Alexandria
 
#26
  Alt 3. Jun 2009, 08:56
Zitat:
Und die neueste Version hab ich noch nicht in die DP gestellt, weil ich auf Antwort vom Moderator warte, wie ich es anstellen kann, daß die neue Version im ersten Beitrag erscheint.
Im Bereich Freeware kann der TE seinen ersten Beitrag auch nach mehr als 24 Stunden editieren. Du kannst die Version dort also problemlos austauschen.
Markus Kinzler
  Mit Zitat antworten Zitat
Amateurprofi

 
Delphi XE2 Professional
 
#27
  Alt 3. Jun 2009, 11:42
Ich habe eine neue Version des Programms in den ersten Beitrag dieses Threads gestellt.
@mkinzler : Danke für die Info, wie das geht.

Was ist neu?:

himitsu: Zeilennumerierung beginnt jetzt mit 1 (vorher 0).
coprsman: Linksbündige Ausgabe jetzt möglich.
Menu>Optionen>Ansicht>Ergebnissse linksbündig.

matze: Auf vorige Zeile zugreifen funktioniert jetzt.
himitsu: Auf alle vorherigen zugreifen funktioniert jetzt.
@ holt das Ergebnis der vorigen Zeile.
@x holt das Ergebnis von Zeile x, wobei x eine Zeile vor der aktuellen Zeile sein muß.
@-x holt das Ergebnis von Zeile (aktuelle Zeile - x), wobei (aktuelle Zeile - x) > 0 sein muß.
x steht hierbei für eine Ziffer bzw. eine Folge von Ziffern.

himitsu: Zahlen mit einer Basis 2 bis 36 können jetzt wie von dir vorgeschlagen aussehen.
bisher #8#123 (Basis 8, Zahl = 123)
jetzt auch 8#123
Prinzip : Wenn an einer Stelle, an der von der Syntax her eine Zahl stehen könnte
eine Integerzahl im Bereich 2 bis 36 steht, und direkt dahinter ein "#" steht,
dann wird diese Zahl als Basis angesehen und der hinter dem "#" stehende Teil als
Zahl mit dieser Basis aufgefaßt.
Steht vor einem "#" eine Zahl, die nicht integer, oder < 2 oder > 36 ist, dann
erwartet das Program die alte Schreibweise, also hinter dem '#' die Basis,
gefolgt von einem "#", dem die eigentliche Zahl folgt.

sLaSh11: Es kann jetzt festgelegt werden, ob der Inhalt des Eingabefensters beim Programmende
gespeichert wird, oder nicht. Für Variablen und ggfs. vom Anwender veränderte Prioritäten
der Rechenoperatoren gilt das Gleiche.
Menu > Optionen > Einstellungen
  Mit Zitat antworten Zitat
Benutzerbild von Corpsman
Corpsman

 
Delphi XE2 Professional
 
#28
  Alt 15. Jun 2009, 10:38
Dein Parser Rechnet Falsch

(((5^16) mod 47)^9) mod 47 = 21
(((5^9) mod 47)^16) mod 47 = 0

behauptet dein Parser,

Laut Google ist das aber = 34, beides mal ...
Uwe
  Mit Zitat antworten Zitat
Benutzerbild von kroimon
kroimon

 
RAD-Studio 2010 Arc
 
#29
  Alt 15. Jun 2009, 10:46
Zitat von Corpsman:
(((5^16) mod 47)^9) mod 47 = 21
Laut Google ist [google](((5^16) mod 47)^9) mod 47[/google] = 21

Zitat von Corpsman:
(((5^9) mod 47)^16) mod 47 = 0
und [google](((5^9) mod 47)^16) mod 47[/google] rechnet Google (und wohl auch der Rechner hier) dank zu großer Zahlen (40^16) gar nicht.

Edit: Aber Wolfram|Alpha tut es und kommt auf 21!

Zitat von Corpsman:
Laut Google ist das aber = 34, beides mal ...
~Stefan
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu

 
Delphi 12 Athens
 
#30
  Alt 15. Jun 2009, 10:52
hmmm, hab's grad mal damit versucht und da kommt das raus

(((5 ^ 16) mod 47) ^ 9) mod 47
((152.587.890.625 mod 47) ^ 9) mod 47
(17 ^ 9) mod 47
118.587.876.497 mod 47
= 21

(((5^9) mod 47) ^ 16) mod 47
((1.953.125 mod 47) ^ 16) mod 47
(40 ^ 16) mod 47
42.949.672.960.000.000.000.000.000 mod 47
= 21

[edit]
zu langsam ... ich brauch wohl auch noch 'nen Matheparser dazu
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 3 von 10     123 45     Letzte »    


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 09:31 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz