WEB TASARIM VE PROGRAMLAMA DERSİ 2. DÖNEM 2. YAZILI SORULARI ve CEVAPLARI

 

1)    (…..) Web formu, <form runat=”server”> ifadesiyle başlar </form> ifadesiyle biter.

2)    (…..) <script runat=”server”>…..</script> ifadeleri arasında yazılan bölüme kod bildirim bloğu (Code declaration block) denir.

3)    (…..) ASP.NET sayfalarının uzantısı asp.net’dir.

4)    (…..) ASP, Alternatif Sunucu Protokolleri kelimelerinin kısaltmasıdır.

5)    (…..) ASP.NET sayfaları Not Defteri programı dışında hiçbir programla oluşturulamaz.

6)    (…..) Long veri tipi hafızada 8 Bayt yer kaplar.

7)    (…..) Byte veri tipinin değer aralığı 0-255 arasındadır.

8)    (…..) Date veri tipi hafızada 4 Byte yer kaplar.

9)    (…..) String, bir karakter dizisini, grubunu ifade eder.

10) (…..) “Dim evtel, ceptel, istel as string” değişken doğru şekilde tanımlanmıştır.

11) (…..) “Cint” fonksiyonunu integer veri türünü stringe dönüştürür.

12) (…..) “TextBox.Text=2*2^3+3” TextBox.Text’ın değeri 64 tür.

13) (…..) “If..then..else” bir kontrol deyimidir.

14) (…..) “Select case” Bir döngü deyimidir.

15) (…..) For..Next Deyimi döngü deyimidir

16) Aşağıdaki kodların ekran çıktısını yazınız.(10p)
dim ad(4) as string

dim i as integer
ad(0) = “Mehmet”

ad(1) = “Buse”

ad(2) = “Başak”

ad(3) = “Burak”

ad(4) = “Eser”

for i= 0 to 4
if i<3 then

response.write(ad(i) & “<br>”)
end if

next

17)   Numaranızı ve adınızı 50 defa alt alta yazan kod satırlarını yaznız.( For…Next deyimi kullanmayacaksınız)(15p)

 

 

 

 

 

 

 

 

 

 

 

 

18)   Ekran çıktısını yan tarafa yazınız.(10)

dim ad(4) as string

ad(0) = “Mehmet”

ad(1) = “Buse”

ad(2) = “Başak”

ad(3) = “Burak”

do
i=i+1

response.write(ad(i) & “<br>”)

loop until i<3

 

 

 

 

 

19)   Alt program ile alt fonksiyon arasındaki farkları örnek vererek açıklayınız(10p)

 

20)              Aşağıda bir dirtdörtgenin alanını ve çevresini hesaplayan bir program vardır

a) Alan butonuna tıklantığında TextBox1 ve TextBox2 yazılmış değerlere göre hesap yaparak sonucu label1’e yazdırmalı(3p)

b) Çevre butonuna tıklantığında TextBox1 ve TextBox2 yazılmış değerlere göre hesap yaparak sonucu label1’e  yazdırmalı(4p)

c) Eğer herhangi bir (kenar1 veya kenar2) uzunluk girilmemişse label1 de değerlerden birini girmediniz yazmalı(4p)

d) Eğer kenar1 ve kenar2 birbirine eşitse label1’e sonuca ek olarak birde “bu bir karedir” yazısını yazmalı(4p)

e) Kodları yazarken bir adet function ve bir adet alt program kullanmalısınız.(10p)

 

 

WEB

CEVAPLAR

 

1)    (..D..) Web formu, <form runat=”server”> ifadesiyle başlar </form> ifadesiyle biter.

2)    (..D..) <script runat=”server”>…..</script> ifadeleri arasında yazılan bölüme kod bildirim bloğu (Code declaration block) denir.

3)    (..Y..) ASP.NET sayfalarının uzantısı asp.net’dir.

4)    (..Y..) ASP, Alternatif Sunucu Protokolleri kelimelerinin kısaltmasıdır.

5)    (..Y..) ASP.NET sayfaları Not Defteri programı dışında hiçbir programla oluşturulamaz.

6)    (..D..) Long veri tipi hafızada 8 Bayt yer kaplar.

7)    (..D..) Byte veri tipinin değer aralığı 0-255 arasındadır.

8)    (..Y..) Date veri tipi hafızada 4 Byte yer kaplar.

9)    (..D..) String, bir karakter dizisini, grubunu ifade eder.

10) (..D..) “Dim evtel, ceptel, istel as string” değişken doğru şekilde tanımlanmıştır.

11) (..Y..) “Cint” fonksiyonunu integer veri türünü stringe dönüştürür.

12) (..Y..) “TextBox.Text=2*2^3+3” TextBox.Text’ın değeri 64 tür.

13) (..D..) “If..then..else” bir kontrol deyimidir.

14) (..Y..) “Select case” Bir döngü deyimidir.

15) (..D..) For..Next Deyimi döngü deyimidir

16) Aşağıdaki kodların ekran çıktısını yazınız.(10p)
dim ad(4) as string

dim i as integer
ad(0) = “Mehmet”

ad(1) = “Buse”

ad(2) = “Başak”

ad(3) = “Burak”

ad(4) = “Eser”

for i= 0 to 4
if i<3 then

response.write(ad(i) & “<br>”)
end if

next

Mehmet
Buse
Başak

17)   Numaranızı ve adınızı 50 defa alt alta yazan kod satırlarını yaznız.( For…Next deyimi kullanmayacaksınız)(15p)

Dim i As Integer
While i < 50

Response.Write(no & ad &”<br>”)

i = i + 1

End While

 

Dim i As Integer
Do While i < 50

Response.Write(no & ad &”<br>”)

i = i + 1

Loop

 

Dim i As Integer
Do

Response.Write(no & ad &”<br>”)

i = i + 1

Loop While i < 50

 

Dim i As Integer

Do Until i > 49

Response.Write(no & ad &”<br>”)
i = i + 1

Loop

 

Dim i As Integer

Do

Response.Write(no & ad &”<br>”)
i = i + 1
Loop Until i > 49

 

 

 

18)   Ekran çıktısını yan tarafa yazınız.(10)

dim ad(4) as string

ad(0) = “Mehmet”

ad(1) = “Buse”

ad(2) = “Başak”

ad(3) = “Burak”

do
i=i+1

response.write(ad(i) & “<br>”)

loop until i<3

Buse

 

 

19)   Alt program ile alt fonksiyon arasındaki farkları örnek vererek açıklayınız(10p)
Alt programlarla benzer işleyişine sahip olan fonksiyonların alt programlardan farkı, ana programa değer döndürmesidir. Alt programlar, tek başlarına bir eylemi yerine getirir, fonksiyonlar ise sadece çağrıldıkları yere değer gönderirler.

20)              Aşağıda bir dirtdörtgenin alanını ve çevresini hesaplayan bir program vardır

a) Alan butonuna tıklantığında TextBox1 ve TextBox2 yazılmış değerlere göre hesap yaparak sonucu label1’e yazdırmalı

b) Çevre butonuna tıklantığında TextBox1 ve TextBox2 yazılmış değerlere göre hesap yaparak sonucu label1’e  yazdırmalı

c) Eğer herhangi bir (kenar1 veya kenar2) uzunluk girilmemişse label1 de değerlerden birini girmediniz yazmalı

d) Eğer kenar1 ve kenar2 birbirine eşitse label1’e sonuca ek olarak birde “bu bir karedir” yazısını yazmalı

e) Kodları yazarken bir adet function ve bir adet alt program kullanmalısınız.

 

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

If TextBox1.Text = “” Or TextBox2.Text = “” Then

Label1.Text = “Kenarlardan birini girmediniz”

ElseIf TextBox1.Text = TextBox2.Text Then

Label1.Text = “Bu bir karedir. Alanı ise ” & CInt(TextBox1.Text) * CInt(TextBox2.Text)

Else

alan()

End If

End Sub

Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click

If TextBox1.Text = “” Or TextBox2.Text = “” Then

Label1.Text = “Kenarlardan birini girmediniz”

ElseIf TextBox1.Text = TextBox2.Text Then

Label1.Text = “Bu bir karedir. Çevresi ise ” & CInt(TextBox1.Text) * 4

Else

Label1.Text = cevre()

End If

End Sub

Sub alan()

Label1.Text = CInt(TextBox1.Text) * CInt(TextBox2.Text)

End Sub

Function cevre()

Return (CInt(TextBox1.Text) + CInt(TextBox2.Text)) * 2

End Function

 

 

WEB TASARIM VE PROGRAMLAMA DERSİ 2. DÖNEM 2. YAZILI SORULARI ve CEVAPLARI” için 2 yorum

Bir cevap yazın

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir

This site uses Akismet to reduce spam. Learn how your comment data is processed.