Web Tasarımı ve Programlama 2.Dönem 2.Yazılı

Mesleki ve Teknik Anadolu Lisesi Web Tasarımı ve Programlama Dersi 2.Dönem 2.Yazılı

Soru1: Açılan listeden seçilen işleme göre çarpma, çıkarma, toplama ve bölme işlemlerini yapan programın Sub – End Sub arasındaki kodlarını yazınız.

dim sayi1,sayi2,t,c,ca,bo as single
sayi1=a.text
sayi2=b.text
t=sayi1+sayi2
c=sayi1-sayi2
ca=sayi1*sayi2
bo=sayi1/sayi2

if sec.selecteditem.value=”1″ then sonuc.text=t
if sec.selecteditem.value=”2″ then sonuc.text=c
if sec.selecteditem.value=”3″ then sonuc.text=ca
if sec.selecteditem.value=”4″ then sonuc.text=bo

Soru2: Klavyeden girilen sayının Asal sayı olup olmadığını bulan ve ekrana “Sayı Asal” yada “Sayı Asal Değil” şeklinde yazdıran programın Sub – End Sub arasındaki kodlarını yazınız.


dim a,i,b as integer
a=sayi.text
b=1
for i=2 to a-1
if a mod i=0 then b=0
next
if b=1 then
response.write("sayı asal")
else
response.write("sayı asal değil")
end if


Soru3: Klavyeden girilen sayıdan 0’a kadar olan ve 3’e tam olarak bölünebilen tamsayıları ekrana alt alta yazdıran programın Sub – End Sub arasındaki kodlarını yazınız.


dim a,i as integer
a=sayi.text
for i=a to 0 step -3
response.write(i)
response.write("
")
next


Soru4: Klavyeden dirilen öğrenci notuna göre sonucu 0-1-2-3-4-5 şeklinde ekrana yazdıran programın kodunu IF komutu kullanarak Sub – End Sub arasındaki kodlarını yazınız.


dim s as integer
s=kutu1.text

if s=0 and s24 and s44 and s54 and s69 and s84 and s100 then response.Write(“0 ile 100 arasında puan giriniz”)

Soru5: Eleman sayısı klavyeden girilen Fibonacci Dizisinin elemanlarını alt alta ekrana yazdıran programın Sub – End Sub arasındaki kodlarını yazınız.


dim dizi(a) as integer
dizi(1)=1
dizi(2)=2

for i=3 to a
dizi(i)=dizi(i-1)+dizi(i-2)
next
for i=1 to a
response.write(dizi(i))
response.write(”
“)
next

Not:Her soru 20 puandır.