Matematické Fórum

OndraVesely · 02. 06. 2013 16:20

Dobrý den, potřeboval bych pomoc. Umím v Pascalu ale ne moc dobře v Javascriptu. Napsal jsem program v Pascalu-řeší kvadratickou rovnici. Nyní bych chtěl udělat to samé v javascriptu.

Takto to vypadá v Pascalu (je to funkční):
program Kvadraticka_rce;

{ $mode objfpc}{$ H+}

uses crt;

Var a,b,c,x1,x2,D:real;

begin
Writeln('Reseni kvadraticke rovnice');
Writeln('Vzresim rovnici ve tvaru: a*x*x+b*x+c=0');
write(' a: ');
readln(a);
if a=0 then write ('Neni kvadratic. rce')
else
begin
write(' b: ');
readln(b);
write(' c: ');
readln(c);
D:=b*b-4*a*c;
if d>=0 then
begin
x1:=(-b+sqrt(d))/(2*a);
x2:=(-b-sqrt(d))/(2*a);
writeln('Koreny rovnice: ');
writeln('x1 = ',x1:1:3);
writeln('x2 = ',x2:1:3);
end
else writeln('Nema reseni v R.');
readln;
end;
end.

Takto jsem se pokousel to udělat v Javascriptu, ale jak říkám jsem samouk ale moc potřebuju tento problém vyřešit. Nefunguje to:
<title>Kvadratická rovnice</title>
</head>
<body>
<h1>Řešení kvadratické rovnice</h1>

<script language="JavaScript">

k = parseFloat(window.prompt("Vyresim rovnici ve tvaru: a*x*x+b*x+c=0. Zadejte a ruzne od nuly",""));
b = parseFloat(window.prompt("Zadejte b",""));
c = parseFloat(window.prompt("Zadejte c",""));

var a, text;
if(a=0);
text = "Neni to kvadraticka rovnice";
document.write(text);

var D, text;
D = (b*b)-(4*a*c);
text = "Diskriminant je";
document.write(text);
document.write(D);

if(D>0)
var x1, text;
x1 = ((-b)+Math.sqrt(D))/2*a;
text = "x1 je";
document.write(text);
document.write(x1);

if(D>0)
var x2, text;
x2 = ((-b)-Math.sqrt(D))/2*a;
text = "x2 je";
document.write(text);
document.write(x2);

{

}

</script>
</body>
</html>

Díky

Leinad1 · 12. 06. 2013 19:58

Aniž bych to moc procházel a testoval, tak vidím několik asi nepozorností.
Prázdné složené závorky na konci kódu? Načítání vstupu do proměnné k, která se pak nevyužije?

Matematické Fórum

#1 02. 06. 2013 16:20

Jak můj program v pascalu převést do javascriptu?

#2 12. 06. 2013 19:58

Re: Jak můj program v pascalu převést do javascriptu?

Zápatí