Delphi-Quellcode:
program TestProg;
{$APPTYPE CONSOLE}
uses
SysUtils;
var a,b,c,d:integer;
function Test(a:integer; var y:integer;const z:integer):integer;
var d:integer;
begin
d:=3;
a:=1; y:=2;
result:= a+y+z-d-c;
end;
begin
a:=3;
a:=1-Test(c,a,b);
b:=5;
b:=Test(1,2,3);
c:=7;
d:=0;
d:=2*Test(d,c,b);
c:= Test(a,b,d);
c:= Test(2*c,d,a-1);
end.
warum ist das falsch?
"Die Typen der tatsächlichen und formalen Var-Parameter müssen übereinstimmen"
damit kann ich irgendwie nichts anfangen.
könnt ihr mir helfen????????