Ein kleiner Taschenrechner

Wiki-Quelltext dieser Seite.

<language>Pascal</language>
Ziel unserer ersten kleinen Übung ist die Gestaltung eines kleinen taschenrechners, der die vier Grundrechenoperatione beherrscht.

==Beispiel Addition==
Addition von zwei reellen Zahlen.
<code id="4d36e1760883e">
var a,b,c:real;
function addiere():real;
begin
 c:= a+b;
 result:=c;
end;
</code>

<run id="4d36df45862a6">
a := StrToFloat(inputDialog('1. Summand'));
b := StrToFloat(inputDialog('2. Summand'));

writeln('Die Summe beträgt: '+addiere()+'.');
</run>