Birden Girilen Sayıya Kadarki Tek Sayıların Toplamı
Yazar
Mesaj
TERLAN
Konu: Birden Girilen Sayıya Kadarki Tek Sayıların Toplamı C.tesi Ağus. 31, 2013 4:30 am
1′den büyük bir sayı girin. Girdiğiniz sayı örneğin 5 ise, sonuç 1+3+5 = 9 olacaktır. <center> <form method=”get” action=”islem.asp”> <table border=”0″ cellpadding=”2″ cellspacing=”2″> <tr> <td><b>Tek sayıların toplamı</b></td> <td></td> </tr> <tr> <td> Sayı : </td> <td><input size=”5″ type=”text” name=”number” value=”" /></td> </tr> <tr> <td> </td> <td> <input type=”submit” value=”HESAPLA” /> </td> </tr> </table> </form> <% number1=Request.QueryString(“number”) if IsNumeric(number1) and number1<>”" then Response.Write “1′den “& xnumber &” sayısına kadar olan tek sayıların toplamı = ” & IslemYap(number1) else Response.Write “<b>Birden büyük bir sayı giriniz</b>” end if %> </center> <% function IslemYap(byval xnumber) dim temp dim i temp=0 if xnumber<1 then temp=”Lütfen 1′den büyük bir sayı giriniz!” else for i=1 to xnumber if (i mod 2 = 1) then temp = temp + i end if next end if IslemYap = temp end function %>
Birden Girilen Sayıya Kadarki Tek Sayıların Toplamı