Hirdetés
- MWC 2026: leégsz, ha nem figyelsz a TCL 15 ezer nites panelje előtt
- Intel Core i5 / i7 / i9 "Alder Lake-Raptor Lake/Refresh" (LGA1700)
- Milyen videókártyát?
- Apple MacBook
- Ilyen olcsó sem volt még egy Apple notebook
- Bambu Lab 3D nyomtatók
- Milyen monitort vegyek?
- HiFi műszaki szemmel - sztereó hangrendszerek
- E-book olvasók
- Fejhallgató erősítő és DAC topik
Ú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
- Elektromos autók - motorok
- Okos Otthon / Smart Home
- MWC 2026: leégsz, ha nem figyelsz a TCL 15 ezer nites panelje előtt
- Hálózati / IP kamera
- Intel Core i5 / i7 / i9 "Alder Lake-Raptor Lake/Refresh" (LGA1700)
- Path of Exile (ARPG)
- Milyen videókártyát?
- Formula-1
- Itt a Galaxy S26 széria: az Ultra fejlődött, a másik kettő alig
- Apple MacBook
- További aktív témák...
- HIBÁTLAN iPhone SE 2020 64GB Black-1 ÉV GARANCIA - Kártyafüggetlen, MS4001
- Apple iPhone 13 128GB,Használt,Adatkabel,12 hónap garanciával
- Legjobb kijelzős!!! HP ZBook Power 15 G8 i7-11850H 32GB 512GB Nvidia RTX A2000 1 év garancia
- Microsoft Surface Laptop 3 13.5" fekete i5-1035G7 16GB 512GB 1 év garancia
- HIBÁTLAN iPhone 15 128GB Pink-1 ÉV GARANCIA - Kártyafüggetlen, MS4443
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

