hlmod.hu

XDD

_________________

Mi a ...XD Programot csak egy kibaszott kérdésre??? XD

_________________
Blasenkampfwagen

https://discord.gg/uBYnNnZP
GTA:PURSUIT MTA

Metal -nak így egyszerűbb

_________________
[sma]CMD:fear(playerid, params[]){ new str[5]; if(!sscanf(params, "s[5]", str)){ if(egyezik(str, "find")) Msg(playerid, "A-a!");}  return 1;}[/sma]

hát ja, programmal egyszerűbb kiszámolni, csak egy képlet kell...

_________________
http://www.ebateam.eu/

Nem egészen, konkrétan végigmentem a számokon.
Ha valakit érdekel, akkor postolom a forráskódot (holnap)

_________________

I'm back

Engemet érdekel

_________________
[sma]CMD:fear(playerid, params[]){ new str[5]; if(!sscanf(params, "s[5]", str)){ if(egyezik(str, "find")) Msg(playerid, "A-a!");}  return 1;}[/sma]

Tessék
Kérdezni bátran lehet

[code=c#]

1. using System;


2. using System.IO;


3.  


4. namespace _10number


5. {


6.     class Program


7.     {


8.         static void Main(string[] args)


9.         {


10.             Console.WriteLine("Indulas");


11.             string strnumber = Console.ReadLine();


12.             TextWriter tw = new StreamWriter("D:\\Cuccok\\data.txt",true);


13.  


14.             double szam;


15.             if (strnumber == "")


16.                 szam = 1234567890;


17.             else


18.                 szam = Double.Parse(strnumber);


19.  


20.             string buff = "";


21.             for (; szam < 9876543211; szam=szam+10)


22.             {


23.                 buff = szam.ToString();


24.                 if (ContainAllNumber(buff))


25.                 {


26.                     if (Oszthato(buff))


27.                     {


28.                         Console.WriteLine(buff + " !! TALALAT !!");


29.                         tw.WriteLine(buff);


30.                     }


31.                 }


32.                 else if (szam % 1000000 == 0)


33.                 {


34.                     string[] buff2 = (szam / 9876543211 * 100).ToString().Split(',');


35.                     Console.WriteLine(buff2[0] + " % (" + szam.ToString() +")");


36.                


37.                 }


38.             }


39.             tw.Close();


40.             Console.WriteLine("READY");


41.             Console.ReadKey();


42.         }


43.  


44.         static public bool ContainAllNumber(string strParam)


45.         {


46.             int szjegy=0;


47.             while (szjegy < 10)


48.             {


49.                 if (strParam.Contains(szjegy.ToString())) szjegy++;


50.                 else return false;


51.             }


52.             return true;


53.         }


54.  


55.         static public bool Oszthato(string buff)


56.         {


57.             int N = 1;


58.             while (N < 11)


59.             {


60.                 if (Double.Parse(buff.Substring(0, N)) % N != 0) return false;


61.                 else N++;


62.             }


63.  


64.             return true;


65.         }


66.     }


67. }


68.  

[/code]

_________________

I'm back

D:\\Cuccok\\data.txt

A data.txt -t is kiírod? xd

_________________
[sma]CMD:fear(playerid, params[]){ new str[5]; if(!sscanf(params, "s[5]", str)){ if(egyezik(str, "find")) Msg(playerid, "A-a!");}  return 1;}[/sma]

data.txt:

3816547290

_________________

I'm back

Akk ha jól értelmezem akkor a data.txt -be menti a megoldást. Ugye?

_________________
[sma]CMD:fear(playerid, params[]){ new str[5]; if(!sscanf(params, "s[5]", str)){ if(egyezik(str, "find")) Msg(playerid, "A-a!");}  return 1;}[/sma]