27.12.2012, 15:18
Witam!
Mam pewien problem. Mianowicie napisałem program opisujący pochodną. Teraz muszę określić jakiej użyłem zmiennej. Wydaje mi się, że jest to zmienna globalna( ale nie jestem pewnien) i teraz czy jest ona wyrażona przez wartość czy przez zmienną:
Oto program:
PROGRAM pochodne;
USES crt;
VAR
x,dx,z1,z2,z3: REAL;
FUNCTION funkcja(x: REAL): REAL;
BEGIN
funkcja:=x*x;
END;
BEGIN
writeln('podaj x: ');
readln(x);
writeln('podaj dx: ');
readln(dx);
BEGIN
z1:=x*2;
{B1}z3:=((funkcja(x+dx)-funkcja(x))/dx-z1);
{B2}z2:=((funkcja(x+dx/2)-funkcja(x-dx/2))/dx-z1);
writeln('B1= ',z3);
writeln('B2= ',z2);
z3:=abs(((funkcja(x+dx)-funkcja(x))/dx-z1));
writeln('z3= ',z3);
END;
readkey;
End.
Mam pewien problem. Mianowicie napisałem program opisujący pochodną. Teraz muszę określić jakiej użyłem zmiennej. Wydaje mi się, że jest to zmienna globalna( ale nie jestem pewnien) i teraz czy jest ona wyrażona przez wartość czy przez zmienną:
Oto program:
PROGRAM pochodne;
USES crt;
VAR
x,dx,z1,z2,z3: REAL;
FUNCTION funkcja(x: REAL): REAL;
BEGIN
funkcja:=x*x;
END;
BEGIN
writeln('podaj x: ');
readln(x);
writeln('podaj dx: ');
readln(dx);
BEGIN
z1:=x*2;
{B1}z3:=((funkcja(x+dx)-funkcja(x))/dx-z1);
{B2}z2:=((funkcja(x+dx/2)-funkcja(x-dx/2))/dx-z1);
writeln('B1= ',z3);
writeln('B2= ',z2);
z3:=abs(((funkcja(x+dx)-funkcja(x))/dx-z1));
writeln('z3= ',z3);
END;
readkey;
End.