Našiel by sa niekto, kto by mi skontroloval zadanie v pascale?? :)

[kingushka]

Zostavte program pre výpočet a tlač hodnoty y=x/x-3 .hodnota x vystupuje z klavesnice.

program funkcia;
var
x:real;
y:real;
begin
write('zadaj x');
readln (x);
if (x <>3) then y=x/x-3;
writeln ('vysledna hodnota funkcie y',y:5:2);
readln;
end.

[Agamemnon]

Code [Select] Expand


program funkcia;
var
  x:real;
begin
  write('zadaj x: ');
  readln(x);
  if (x<>0) then writeln('vysledna hodnota funkcie y=-2')
  else writeln('0 nepatri do def. oboru');
  readln;
end.


[DeViLvs]

a nemyslela si nahodou y=x/(x-3)? tak ci tak podla mna su tu obe riesenia (ci ako nazvat to prve) trochu zle.

[kingushka]

no ba, tak by to malo byt...tak a nevedel by si potom napisat, ako by to malo byt ??

[Havran]

no ba, tak by to malo byt...tak a nevedel by si potom napisat, ako by to malo byt ??

sak tak isto len v tom programe zadas y=x/(x-3)

tiez si nesom isty ci tam nechyba else, teda ci to tam v Pascale musi byt abo ne

to na ktorej fakulte sa toto prebera ? ci to este stredna skola ?

[Agamemnon]

a nemyslela si nahodou y=x/(x-3)? tak ci tak podla mna su tu obe riesenia (ci ako nazvat to prve) trochu zle.

čo sa ti nepáči na mojom riešení?

[DeViLvs]

čo sa ti nepáči na mojom riešení?

sry, trochu mi splynuli pixely a videl som 'vysledna hodnota funkcie y=2' namiesto y=-2, beriem spat.

no ba, tak by to malo byt...tak a nevedel by si potom napisat, ako by to malo byt ??

Ako pise Havran, v prvom rieseni namiesto then y=x/x-3; daj then y=x/(x-3);

[Brand]

Mi to pripada tak, ze sa tu zbehli stredoskolacky a nas zneuzivaju