Başlangıç > Kodlar > VB6’da Bakteri gibi çoğalmak

VB6’da Bakteri gibi çoğalmak


Yapmamız gereken sadece visual basic module açmak

'Bir bakteri cinsi her dört dakikada bir 2 ye bölünerek çoğalmaktadır.Başlangıçta bir bakteri olduğunu kabul edersek bir
'saat sonra oluşacak bakteri sayısını bulan proram'ı yazın.


Module Module1

Sub Main()
Dim i, b As Integer
b = 1
For i = 0 To 60 Step 4
b = b * 2
Console.WriteLine(i & ".dakikada = " & b & "bakteri")
Next
Console.ReadLine()
End Sub

End Module

Reklamlar
  1. Henüz yorum yapılmamış.
  1. No trackbacks yet.

Bir Cevap Yazın

Aşağıya bilgilerinizi girin veya oturum açmak için bir simgeye tıklayın:

WordPress.com Logosu

WordPress.com hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Twitter resmi

Twitter hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Facebook fotoğrafı

Facebook hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Google+ fotoğrafı

Google+ hesabınızı kullanarak yorum yapıyorsunuz. Log Out / Değiştir )

Connecting to %s

%d blogcu bunu beğendi: