DrogbA
Forum Üyesi
- Katılım
- 27 Ara 2020
- Mesajlar
- 3,440
- Tepkime puanı
- 0
- Puanları
- 36
Bir önceki makalemizden devam ederek, birden girilen sayıya kadar olan tek sayıların toplamını for döngüsü ile yapalım. Aşağıdaki kodları islem.asp şeklinde kaydedin ve sayfayı çağırın. Metin alanına 1?den büyük bir sayı girin. Girdiğiniz sayı örneğin 5 ise, sonuç 1+3+5 = 9 olacaktır.
Bir önceki makalemizden devam ederek, birden girilen sayıya kadar olan tek sayıların toplamını for döngüsü ile yapalım. Aşağıdaki kodları islem.asp şeklinde kaydedin ve sayfayı çağırın. Metin alanına 1?den büyük bir sayı girin. Girdiğiniz sayı örneğin 5 ise, sonuç 1+3+5 = 9 olacaktır.
PHP:
<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
%>Bir önceki makalemizden devam ederek, birden girilen sayıya kadar olan tek sayıların toplamını for döngüsü ile yapalım. Aşağıdaki kodları islem.asp şeklinde kaydedin ve sayfayı çağırın. Metin alanına 1?den büyük bir sayı girin. Girdiğiniz sayı örneğin 5 ise, sonuç 1+3+5 = 9 olacaktır.
PHP:
<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
%>