2. Dereceden 1 Bilinmeyenli Denklemlerde Kök Bulmak
<%
islem = request.querystring("islem")
if islem = "" then
%>
A :
B :
C :
<%
elseif islem = "hesapla" then
a = request.form("a")
b = request.form("b")
c = request.form("c")
if IsNumeric(a) AND IsNumeric(b) AND IsNumeric(c) = TRUE Then
delta = b*b - 4*a*c
if delta < 0 then
response.write "Gerçel kökü yoktur. Yeni Hesap"
else
kokdelta = sqr(delta)
birincikok = (-b - kokdelta)/2*a
ikincikok = (-b + kokdelta)/2*a
response.write "X1 : "&birincikok&" X2 : "&ikincikok&" Yeni Hesap "
end if
else
Response.write "Değişkenlere sayısal değerler giriniz. Yeni Hesap"
end if
end if
%>
Bugün 7 ziyaretçi (12 klik) kişi burdaydı!
Sayfa hakkında
Lütfen Okuyun !!!
Saygıdeğer arkadaşlar benim bu siteden tek umudum reklamları tıklamanız. Bu yüzden emeğe saygıdan ve aldığınız kod için reklamlara tıklayınız