Új hozzászólás Aktív témák

• Milgram1 aktív tag

  #2508

  #2502 bucsupeti

  2014-09-23 18:49:30

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  Milgram1

  aktív tag

  #2502 bucsupeti

  angollal megvagyok
  

• Milgram1 aktív tag

  #2501 2014-09-22 22:31:35

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  Milgram1

  aktív tag

  Hali,
  Középsuliban tanulok most MS Visual Basic-et és úgy gondolom hogy az ami órán van az kevés mert vettünk programozási tételeket, fájlkezelést valamennyire és kb ennyi. ezekkel több összetettebb feladtat. Engem érdekelne a dolog, ha ismerném rendesen akkor itthon alkotnék vele dolgokat csak nem tudom hol lehetne tanulni rendesen. Szóval az lenne a kérdésem hogy ismer-e valaki olyan oldalt/könyvet ahol tudok tanulgatni több dolgot hogy hasznavehető programokat írhassak magamnak.

• Milgram1 aktív tag

  #2247

  #2246 Bobrooney

  2013-11-11 21:51:38

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  Milgram1

  aktív tag

  #2246 Bobrooney

  igen, direkt

• Milgram1 aktív tag

  #2245

  #2244 Bobrooney

  2013-11-11 19:18:10

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  Milgram1

  aktív tag

  #2244 Bobrooney

  Megoldottam. Köszönöm

• Milgram1 aktív tag

  #2243 2013-11-11 15:58:36

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  Milgram1

  aktív tag

  Sziasztok!
  Megtudja valaki mondani hogy miért 0-át ír az új tömbökbe?

  Imports System.Console
  Module Module1
  
  Sub Main()
  Dim x(20), y(20), db1, db2, z(20) As Integer
  Randomize()
  For i = 1 To 20
  x(i) = Rnd() * 99 + 1
  WriteLine(x(i))
  Next
  db1 = 0
  db2 = 0
  For i = 1 To 20
  If x(i) Mod 2 = 0 Then
  x(i) = y(i)
  db1 = db1 + 1
  Else
  x(i) = y(i)
  db2 = db2 + 1
  End If
  Next
  Write("páros számok:")
  For i = 1 To 20
  WriteLine(y(i))
  Next
  Write("páratlan számok:")
  For i = 1 To 20
  WriteLine(z(i))
  Next
  
  ReadLine()
  End Sub
  
  End Module

• Milgram1 aktív tag

  #2224

  #2220 McReay

  2013-10-15 15:41:51

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  Milgram1

  aktív tag

  #2220 McReay

  így próbáltam csak a végéről lemardt a ;
  köszönöm

• Milgram1 aktív tag

  #2218

  #2214 martonx

  2013-10-14 23:03:08

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  Milgram1

  aktív tag

  #2214 martonx

  s zövegdobozok m1 m2-nek vannak elnevezve

• Milgram1 aktív tag

  #2213

  #2212 martonx

  2013-10-13 14:59:34

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  Milgram1

  aktív tag

  #2212 martonx

  az m1 az első test tömege az m2 meg a második

• Milgram1 aktív tag

  #2211 2013-10-13 11:13:43

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  Milgram1

  aktív tag

  Sziasztok!
  Szeretném megcsinálni hogy a program kiszámolja a tömegvonzást de végeredménynek mindig azt írja ki hogy nem szám
  Hol a hiba?

  

  

Új hozzászólás Aktív témák