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

• #2559 haromegesz14 aktív tag banán007 #2558

  Új Válasz 2012-02-25 14:16:09 #2559

  Ú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

  Privát üzenet küldése

  

  haromegesz14

  aktív tag

  válasz banán007 #2558 üzenetére

  TextColor paranccsal tudod megoldani.

  Pl. TextColor(Red);

• #2537 haromegesz14 aktív tag vz12 #2536

  Új Válasz 2012-02-01 07:15:23 #2537

  Ú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

  Privát üzenet küldése

  

  haromegesz14

  aktív tag

  válasz vz12 #2536 üzenetére

  Itt is látszik, mennyi közöm volt a matekhoz és programozáshoz még a gimibe

• #2534 haromegesz14 aktív tag zka67 #2526

  Új Válasz 2012-01-31 19:11:56 #2534

  Ú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

  Privát üzenet küldése

  

  haromegesz14

  aktív tag

  válasz zka67 #2526 üzenetére

  Közbe leellenőriztem és rájöttem, hogy igen csak az első 50 páros szám összegét írattam ki. Tovább meg van, hogy miért gondolta,. hogy az úgy jó lesz, volt egy kis segítség biggyesztve a feladat mellé: " A ciklust vegyük egytől ötvenig, majd a ciklusmagban vegyük a ciklusváltozó kétszeresét - így megkapjuk a páros számokat "

  Szóval a feladat amire én válaszoltam az így szólt:
  Készítsünk programot, amely az első 100 db. számból kiválogatja a páros számokat és kiírja azok összegét

• #2533 haromegesz14 aktív tag Martin107 #2532

  Új Válasz 2012-01-31 19:00:18 #2533

  Ú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

  Privát üzenet küldése

  

  haromegesz14

  aktív tag

  válasz Martin107 #2532 üzenetére

  Ha jól számoltam, a 20. prímszám a 71 tehát bármennyire is ronda megoldás:
  for b:=1 to 71 do begin
  "a" érték bekérését törölheted is, vagy a struktúra miatt for ciklusváltozója legyen az "a", "b"-t majd későbbiekben felhasználjuk. Azt, hogy megtudd vizsgálni hogy prímszám-e, valami div/mod segítségével IF használatával szebben meg lehet oldani. (szerintem)
  Ha a szám prímszám, írasd ki, ha nem, akkor ne csináljon semmit.
  if gy=2 then write('prim') else write('nem');
  Ez törlendő, hisz a feladat azt kérte, hogy magát a prímszámokat írasd ki.

  Ennek fényében próbáld meg módosítani az eddigi kódodat, de majd egy hozzá értő biztosan leírja ésszerűbben a dolgokat.

• #2530 haromegesz14 aktív tag haromegesz14 #2528

  Új Válasz 2012-01-31 18:15:42 #2530

  Ú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

  Privát üzenet küldése

  

  haromegesz14

  aktív tag

  válasz haromegesz14 #2528 üzenetére

  Első 100 szám összegének 5050-et kaptam, a fenti programmal az első 100 páros szám összegére 2450-et, az első 100 páratlan szám összegére pedig 2500-at. A hiányzó 100 merre van?

• #2529 haromegesz14 aktív tag Martin107 #2527

  Új Válasz 2012-01-31 18:09:34 #2529

  Ú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

  Privát üzenet küldése

  

  haromegesz14

  aktív tag

  válasz Martin107 #2527 üzenetére

  Írd le ide meddig jutottál a kóddal, utána könnyebben fogok neked tudni segíteni

• #2528 haromegesz14 aktív tag zka67 #2526

  Új Válasz 2012-01-31 18:06:15 #2528

  Ú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

  Privát üzenet küldése

  

  haromegesz14

  aktív tag

  válasz zka67 #2526 üzenetére

  Szelektív olvasóknak: nem oktatási intézmény bármilyen nemű órájára készült/készül a többi sem, hanem csupán a nyelv felidézésére.

  Ciklusváltozó kétszeresével számoltam, így megkapva a páros számokat. ( Persze lehet rossz elgondolás )

  Ez mivel még a 3. feladatsor utolsó 2 feladat, nincs még tudomásunk bármi egyéb más ciklus eljárás illetve feltételvizsgálat létezéséről.

• #2524 haromegesz14 aktív tag

  Új Válasz 2012-01-31 13:53:38 #2524

  Ú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

  Privát üzenet küldése

  

  haromegesz14

  aktív tag

  Találtam neten jó pár adag feladatsort, gondoltam végig csinálgatom őket ezzel ellenőrizve a felületes Pascal "tudásom" Már a 3. feladatsornál elakadtam, egyszerűen nem fog az agyam, de inkább ott a probléma hogy ellenőrizni se tudom némelyik feladatnál magam, mert nincs közzétéve a megoldás.

  Így szól a feladat:
  Készítsünk programot, amely kiszámolja az első 100 db. páros szám összegét.

  Ezt írtam rá:

  program forciklus;
  var
  i,s:integer;
  begin
  s:=0;
  for i:=1 to 50 do s:=i*2+s;
  writeln(s);
  readln();
  end.

  Jó-e? Ha igen, ugyan ezt a feladatot páratlan számokra:
  for i:=1 to 50 do s:=(i*2-1)+s;?

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