Hausaufgabe richtig?

Hi, also wir sollen als Hausaufgabe einen Multirechenr schreiben, der einen zuerst nach der Rechenart fragt und diese dann ausführt. Ich wollt mal wissen, ob das hier so richtig ist

program Multi_Rechner;
uses wincrt;
var 	a,b:real
	antwort1:string;

begin

clrscr;
writeln('DER MULTI-RECHNER');
writeln('=================');
writeln;

write('Welche Rechenart möchten sie ausführen?');
readln(antwort1);

write('Bitte den ersten Wert eingeben');
readln(a);
write('Bitte den zweiten Wert eingeben');
read(b);

Ad:=(antwort1='addieren');
Sub:=(antwort1='subtrahieren');
Mult:=(antwort1='multiplizieren');
Div:=(antwort1='dividieren');

Ergebnis:= Ad or Mult;

If Ergebnis 	then writeln('Das Ergebnis lautet:' ,a+b));
	                else writeln('Das ERgebnis lautet:' ,a*b));
		
Ergebnis_2:= Sub or Div;

If Ergebnis_2	then writeln('Das Ergebnis lautet:' ,a/b));
		else writeln('Das Ergebnis lautet:' ,a-b)):
END.

[Cage]

Hallo

Ergebnis:= Ad or Mult;

If Ergebnis    then writeln('Das Ergebnis lautet:' ,a+b));
                   else writeln('Das ERgebnis lautet:' ,a*b));
      
Ergebnis_2:= Sub or Div;

If Ergebnis_2   then writeln('Das Ergebnis lautet:' ,a/b));
      else writeln('Das Ergebnis lautet:' ,a-b)):

Diesen Teil verstehe ich nicht bzw. er kommt mir ziemlich kompliziert vor. In Pascal gibs doch bestimmt switch oder elseif Anweisungen? Dann könntest du nämlich schreiben:

if antwort1 = 'addieren'
then
writeln('Das Ergebnis lautet:' ,a+b);
end;

elseif antwort1 = 'subtrahieren'

usw.

Außerdem scheinen deine If Anweisungen noch nicht ganz richtig sein. Wenn ich mich richtig erinnere, braucht in Pascal jedes if ein end; . Und wieso haben eigentlich deine writeln()s zwei Klammern am Ende?

Gruß
Cage

Also die zwei Klammern brauch er angeblich, da hat er gemeckert. Er meint


) fehlt

Also ich hab ja oben mit

Ad:=(antwort1='addieren'); 
Sub:=(antwort1='subtrahieren'); 
Mult:=(antwort1='multiplizieren'); 
Div:=(antwort1='dividieren');

schon definiert, was Ad, Sub Mult und Div sind. Und wenn dann bei der if else angabe eines davon steht, dann macht er entweder then oder er macht else.