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 97 ziyaretçi (125 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