Hirdetés
Új hozzászólás Aktív témák
-
válasz
#59892992
#2468
üzenetére
Egyrészt ha kiavítanád, sem lenne jó (for a = 2 to 10), mivel 1. a kiiratás nem a ciklusban van, 2. ráadásul az értékadás után (for) változtatod a ciklusváltozó értékét.
Próbáld ki az alábbiakat és rájössz a különbségre:
1.
Sub Main()
Dim a As Integer
a = 0
For a = 2 to 10
a = a + 2
Next
Console.WriteLine("A páros számok 1-től 10-ig=" & a)
End Sub2.
Sub Main()
Dim a As Integer
a = 0
For a = 2 to 10
a = a + 2
Console.WriteLine("A páros számok 1-től 10-ig=" & a)
Next
End Sub3.
Sub Main()
Dim a As Integer
a = 0
For a = 2 to 10
Console.WriteLine("A páros számok 1-től 10-ig=" & a)
a = a + 2
Next
End Sub4.
Sub Main()
Dim a As Integer
Console.WriteLine("A páros számok 1-től 10-ig:")
For a = 2 to 10 step 2
Console.WriteLine(a)
Next
End Sub
Új hozzászólás Aktív témák
- AliExpress tapasztalatok
- Csillagfelhő áztatná el Elon Musk űrkarneválját
- AMD GPU-k jövője - amit tudni vélünk
- Google Pixel topik
- 50 év után kilőtt négy űrhajós a Holdra
- Telekom otthoni szolgáltatások (TV, internet, telefon)
- E-roller topik
- Abarth, Alfa Romeo, Fiat, Lancia topik
- Samsung Galaxy Felhasználók OFF topicja
- Alkotói pályázatok
- További aktív témák...
- ELADÓ - Apple iPhone 14 Pro - 128gb
- Kiváló Thrustmaster T248 kormány + Posta! PS5 PS4 PC
- teljesen ÚJ Bontatlan Apple iPhone 17e 256GB ! 1Év nemzetközi APPLE GARANCiA
- ÚJ bontatlan Apple iPhone 17 Pro Max 256GB ! aktiválástól 1 ÉV nemzetközi APPLE GARANCiA
- Aorus RGB 16GB (2x8GB) DDR4 3333MHz GP-ARS16G33
- Apple iPhone 13 Pro Max Graphite 128GB használt karcmentes 100% új akku 6 hónap garancia
- Xiaomi 15 256GB,Újszerű,Dobozaval,12 hónap garanciával
- M5! KÉSZLETKISÖPRÉSI ULTRAAKCIÓ!!! SPACE BLACK MacBook Pro 14" M5!!! 10C/10G 16GB 512GB Gar!
- AKCIÓ! MSI ThinA15 B7VF-449XHU Gamer notebook - R7 7735HS 16GB DDR5 1TB SSD nVidia RTX 4060 8GB
- Itachi! Felsőkategóriás Gamer PC! Csere-Beszámítás! R7 9800X3D/ 9070XT / 32GB DDR5 / 2TB Nvme SSD
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

