kleine mathematische Beispiele (2)

Addition einfacher Terme

Schreibe eine Funktion zur Berechnung der Summe von Produkt und Quotient zweier Zahlen.

Berechnung einer Quadratzahl

Schreibe eine Funktion zur Berechnung der Quadratzahlen.

Berechnung mehrerer Quadratzahlen

Ergänze Dein Programm so, dass die ersten 5 (10, 20, ...), also n beliebigen Quadratzahlen berechnet und ausgegeben werden.
Es werden also mehrere Werte ausgegeben. Dies ist mit einer function nicht möglich.
Es wird eine procedure verwendet.

Analysiere den folgenden Beispielquelltext im Vergleich zur Schreibweise einer Funktion.

procedure qua2(a:integer); var zahl, i:integer; begin for i:=1 to a do begin zahl:=i*i; writeln(zahl); end; end;		Struktogramm
qua2(5);ausführen