Programalama > ASP.NET

Etiketler: sayi, buldurma

Ort. 0
Puan ver:
Dim a, b, c, d
        Dim sayi(5) As Integer
        
        
        For a = 0 To 5
            sayi(a) = Rnd(1) * 49 + 1
            Me.liste.Items.Add(sayi(a))
        Next
        
     
        d = sayi(0)
        c = sayi(0)
        
        For a = 1 To 5
            If d < sayi(a) Then
                d = sayi(a)
            End If
        Next
        For a = 1 To 5
            If c > sayi(a) Then
                c = sayi(a)
            End If
        Next
        Response.Write("En büyük sayı....." & d & "<br>")
        Response.Write("En küçük sayı....." & c & "<br>")


Yorumlar                 Yorum Yaz
ozlem (0) Sakıncalı Yorum 29 March 14:53
hçbşy yapamadm bu kodla. lutfen YARDIM!!!
KATEGORİLER
ASP - 240
ASP.NET - 24
C# - 75
C++ - 174
CGI - 8
DELPHI - 247
FLASH - 49
HTML - 536
PASCAL - 246
PERL - 11
PHP - 160
WML - 9
XML - 2
Copyright © 2002 - 2017 Hazır Kod - Tüm Hakları Saklıdır.
Siteden yararlanırken gizlilik ilkelerini okumanızı tavsiye ederiz.
hazirkod.com bir İSObil projesidir.