Hirdetés
- Kétezer eurós csomag lehet a Vivo X300 Ultra
- Xiaomi 17 Ultra - jó az optikája
- Honor 200 Pro - mobilportré
- Xiaomi 15T Pro - a téma nincs lezárva
- Samsung Galaxy A56 - megbízható középszerűség
- Xiaomi 15T - reakció nélkül nincs egyensúly
- Samsung Galaxy S25 - végre van kicsi!
- Meglepően lassú az iOS 26 terjedése
- Android alkalmazások - szoftver kibeszélő topik
- Amazfit Active 2 NFC - jó kör
Ú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
- Elemlámpa, zseblámpa
- NVIDIA GeForce RTX 5080 / 5090 (GB203 / 202)
- Samsung Galaxy Felhasználók OFF topicja
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Akvarisztika
- Hobby elektronika
- Kétezer eurós csomag lehet a Vivo X300 Ultra
- Formula-1
- Azonnali alaplapos kérdések órája
- The Division 2 (PC, XO, PS4)
- További aktív témák...
- új, bontatlan, iPhone 17E gyárilag kártya-független, apple világgaranciával
- Új, bontatlan - Apple MacBook Neo 13" A18 Pro 6CPU/5GPU/ 8GB/256GB Touch ID - Indigo/Silver
- Microsoft Surface Laptop 7 13,8" 2340x1560 touchscreen, Snapdragon X Elite, 32GB/1TB
- Biostar A55MLV Ver. 6.0 AMD FM1 alaplap
- Gyári dobozos Sapphire Radeon HD5450 PCI-E videokártya, szinte új!
- AKCIÓ! LENOVO ThinkPad P15 Gen1 munkaállomás - i7 10850H 16GB DDR4 256GB SSD Quadro T1000 4GB W
- Honor 90 Lite 256GB, Kártyafüggetlen, 1 Év Garanciával
- 273 - Lenovo Legion Pro 5 (16IAX10H) - Intel Core U9 275HX, RTX 5070Ti (ELKELT)
- AKCIÓ! Samsung Galaxy Tab S9+ 5G 256GB WiFi 5G tablet garanciával hibátlan működéssel
- Keresünk iPhone 14/14 Plus/14 Pro/14 Pro Max
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

