Hirdetés
- Lassacskán fenyőfát állítanak a hardverek
- Tudjuk, de nem tesszük: a magyarok többsége nem törődik adatai védelmével
- Mesébe illő csodakábelt tervezett a GeForce-ok leégése ellen a Segotep?
- Irodát kért, de gyárat kapott Elon Musk a Samsungtól
- Nyílt forráskódú lett a legegyszerűbben használható AI tartalomgeneráló
- Kormányok / autós szimulátorok topikja
- Vezeték nélküli fejhallgatók
- NVIDIA GeForce RTX 5070 / 5070 Ti (GB205 / 203)
- Projektor topic
- Azonnali VGA-s kérdések órája
- Pánik a memóriapiacon
- AMD Navi Radeon™ RX 9xxx sorozat
- Amlogic S905, S912 processzoros készülékek
- Milyen egeret válasszak?
- Samsung LCD és LED TV-k
Ú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
- Kormányok / autós szimulátorok topikja
- Vezeték nélküli fejhallgatók
- Bestbuy játékok
- One otthoni szolgáltatások (TV, internet, telefon)
- Diablo IV
- NVIDIA GeForce RTX 5070 / 5070 Ti (GB205 / 203)
- Synology NAS
- A fociról könnyedén, egy baráti társaságban
- Anglia - élmények, tapasztalatok
- Motorolaj, hajtóműolaj, hűtőfolyadék, adalékok és szűrők topikja
- További aktív témák...
- GAMER LAPTOP - ASUS Rog Zephyrus M16 / Intel i7 12700 / RTX 3060 6gb / 24gb DDR5 / 2TB ssd
- Gigabyte GA-H110M-S2PV PC 7. gen i5 proci, 240 GB SSD, Jogtiszta Windows 11
- Gamer PC - Z790 / i5 13600 KF / 32 GB / 2 TB / RTX 3080
- RDX Kara Heavy F6 Felnőtt Álló bokszzsák 183CM / max 150Kg, ingyenes szállítás + 1pár kesztyű
- MacBook Pro 17" i7 2.6 GHz 8GB RAM 240 GB SSD 8 ciklus az akkuban!
- 3DKRAFT.HU - 3D NYOMTATÁS - AZONNALI ÁRAJÁNLAT - GYORS KIVITELEZÉS - 500+ POZITÍV ÉRTÉKELÉS
- GYÖNYÖRŰ iPhone 13 Pro 256GB Sierra Blue -1 ÉV GARANCIA - Kártyafüggetlen, MS3358
- 160 - 177 - 178 - Lenovo LOQ (15IRX9) - Intel Core i7-13650HX, RTX 4060
- 2025.12.04 - Frissített Lenovo Gamer árlista (RTX 5090 / 4090 / 5080 / 4080 / 5070Ti / 4070 / 5060)
- Telefon felváráslás!! Xiaomi 13T, Xiaomi 13T Pro, Xiaomi 14T, Xiaomi 14T Pro
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: BroadBit Hungary Kft.
Város: Budakeszi


