Ein kleiner Taschenrechner

Aus ProgrammingWiki

Archivierte Version vom 2011-01-19T13:51:04+00:00. Aktuelle Version

Ziel unserer ersten kleinen Übung ist die Gestaltung eines kleinen taschenrechners, der die vier Grundrechenoperatione beherrscht.

Beispiel Addition

Addition von zwei reellen Zahlen.

var a,b,c:real;
function addiere():real;
begin
 c:= a+b;
 result:=c;
end;

a := StrToFloat(inputDialog('1. Summand'));
b := StrToFloat(inputDialog('2. Summand'));

writeln('Die Summe beträgt: '+addiere()+'.');

Erstellen Sie nach dem obigen Muster ein Programm zur Subtraktion von zwei reellen Zahlen.

var d,e,f: real;
function subtrahiere():real;
begin
  // hier den Programmtext ergänzen
end;

d := StrToFloat(inputDialog('Minuend'));
e := StrToFloat(inputDialog('Subtrahend'));

writeln('Die Differenz beträgt: '+subtrahiere()+'.');

Erstellen Sie ein Programm zur Multiplikation zweier reeller Zahlen und überprüfen Sie anschließend Ihr Ergebnis!

var x,y,z:integer;
function multipliziere():integer;
begin
  // hier den Programmtext ergänzen
end;

x := StrToInt(inputDialog('1. Faktor'));
y := StrToInt(inputDialog('2. Faktor'));

writeln('Das Produkt beträgt: '+multipliziere()+'.');