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 birsaat sonra oluşacak bakteri sayısını bulan proram'ı yazın.
'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 birsaat sonra oluşacak bakteri sayısını bulan proram'ı yazın.
Kod:
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