Anhang: Mathematische Funktionen

Hinweis: PL/0 arbeitet nur mit Integern. Die folgenden Beispiele nutzen einfache Festkomma-Naeherungen und sind didaktisch gedacht.

sin (naehereungsweise)

const scale = 1000, six = 6;
var x, x2, x3, sinx;
begin
  ? x;          /* x in Milliradian */
  x2 := (x * x) / scale;
  x3 := (x2 * x) / scale;
  sinx := x - (x3 / six);
  ! sinx
end.

📥 Programm herunterladen

cos (naehereungsweise)

const scale = 1000, two = 2;
var x, x2, cosx;
begin
  ? x;
  x2 := (x * x) / scale;
  cosx := scale - (x2 / two);
  ! cosx
end.

📥 Programm herunterladen

tan (naehereungsweise)

var sinx, cosx;
begin
  ? sinx;
  ? cosx;
  if cosx = 0 then
    ! 0
  else
    ! (sinx / cosx)
end.

📥 Programm herunterladen

Kreisberechnung (Flaeche)

const pi = 3141, scale = 1000;
var r, area;
begin
  ? r;
  area := (pi * r * r) / scale;
  ! area
end.

📥 Programm herunterladen

Details

• Festkomma-Naeherungen fuer trigonometrische Funktionen.
• Ergebnisse sind didaktisch, nicht numerisch exakt.

Beispiel

Eingabe:

1000

Ausgabe:

approx

Testfaelle

• 1000 -> approx
• 2000 -> approx

Ausfuehrung

Beispiel:

dotnet run --project src/Pl0.Cli -- examples/appendix/math-functions/example-1/program.pl0

Tipp: Fuege --list-code hinzu, um den P-Code zu sehen. Fuege noch --wopcod hinzu, um zusaetzlich den Op-Code anzuzeigen.

P-Code anzeigen:

dotnet run --project src/Pl0.Cli -- examples/appendix/math-functions/example-1/program.pl0 --list-code

P-Code mit Op-Codes anzeigen:

dotnet run --project src/Pl0.Cli -- examples/appendix/math-functions/example-1/program.pl0 --list-code --wopcod