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

• #2649 vz12 tag kemkriszt98 #2647

  Új Válasz 2013-11-13 21:48:40 #2649

  Ú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

  

  vz12

  tag

  válasz kemkriszt98 #2647 üzenetére

  Az eredeti feltétel így szólt:
  > ha van két szám pl egy és kettő

  Kissé pongyola (hiányos) a feltétel amit közöltél, de próbáltam irányt mutatni.
  Csak pozitív egyjegyű egész számod lehet?
  Mi van, ha negatív számod is van?
  Mi van, ha többjegyű számod is van?
  Mi van, ha NEM egész számod van?
  A komplex számokat hagyjuk is ...

  Mert akkor értelmetlen a feladat.

  Módszer javaslat (az előző módszer kiterjesztése), feltételezve hogy minden számod pozitív egyjegyű egész szám: (bocsi, a "sallangokat" elhagytam)

  eredmeny:=0;
  repeat
  readln(x);
  if (x>=1) and (x<=9) then eredmeny:=eredmeny*10 + x;
  until (x<1) or (x>9);
  if eredmeny>0 then writeln(eredmeny);

  Az eredmeny legyen longint típusú, de annak is van felső határa ...

• #2648 bucsupeti senior tag kemkriszt98 #2647

  Új Válasz 2013-11-12 19:09:44 #2648

  Ú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

  

  bucsupeti

  senior tag

  válasz kemkriszt98 #2647 üzenetére

  A számokat összerakod egy sztringbe aztán végigiterálsz rajta és a megfelelő 10 hatványával megszorzod a számot. Nyilván a dolog a real értékhatárok között tud működni.

  Pl:
  szam='54321'
  length(szam) -> 5 tehát a 5-1 =4 azaz 10^4lesz a legmagasabb helyi értéked.
  végigjárod a sztringet és szorzod az aktuális karakter számértékét 10^valahányadikonnal amit összegzel egy változóban.
  Miután végigjártad az összegzett érték a szám értéke lesz.

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