» Poradna » Programy

Delphi - Prevod z desitkove do dvojkové soustavy

 |   |  Microsoft Windows XP Chrome 26.0.1366.0

Čau lidi, prosim o malou pomoc nebo klidně i větší Jak bych zhruba měl tohle naprogramovat v delphi Prevod z desitkove do dvojkové soustavy?

Odpovědi na otázku

 |   |  Microsoft Windows 7 Opera 9.80
 |   |  Microsoft Windows 8 Chrome 26.0.1410.64

Copak? Zadání seminárky? Copak jsi dělal o hodinách? Nikdo za tebe nic řešit nebude.....když by to za tebe někdo vyřešil, tak co bys dělal u zkoušky?

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   |  Microsoft Windows XP Chrome 26.0.1366.0

ja vim jak se prevadi, spis me zajima jak to napsat v delphi :(

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   |  Microsoft Windows 8 Chrome 26.0.1410.64

A s čím konkrétně máš problém?

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   |  Microsoft Windows 8 Chrome 26.0.1410.64

Chce, abysme mu sem hodili zdroják, to je celý. Ale doufám, že zde budou rozumní jedinci a nechaj ho namáhat si hlavu.....seminárku si musí každej vypracovat sám.

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   |  Microsoft Windows 8 Chrome 26.0.1410.64

To už je tvůj problém. Nemáš o hodinách civět na net nebo hrát hry. A toto je pouze seminárka, u zkoušky tě čekaj větší prasárny (my jsme měli třeba šachy nebo poznámkovej blok). Takže hodně zdaru a doufám, že ti tu někdo nenapíše zdroják. Když znáš princip, tak to naprogramuj.

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   |  Microsoft Windows 7 Opera 9.80

pokud neumíš napsat cyklus s dělením dvěma a ukládáním zbytků do pole tak co chceš radit ?

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   |  Microsoft Windows 7 Opera 9.80
 |   |  Microsoft Windows 8 Chrome 26.0.1410.64

Tak v Delphi to striktně dělat nemusí. Stačí jakejkoliv editor, kterej bude zvládat překládat syntaxi Pascalu.

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   |  Microsoft Windows 7 Firefox 36.0

function PrevodNaBin(cislo:integer): string;var S:string;begins:= ''; while cislo>0 do begin if cislo mod 2 = 0 then S:= '0'+S else S:= '1' + S; cislo := cislo div 2; end; PrevodNaBin :=S;end;procedure Tfrmhlavni.btnPrevodClick(Sender: TObject);beginself.lblvysledek.Caption := PrevodNaBin(StrToInt(self.edtCsilo.Text));end;end.

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   |  Microsoft Windows 7 Chrome 28.0.1485.0

Blázníš dědku? Tohle by bylo trapné i na kroužku z programování na základnce na Moravě.

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   |  Linux Chrome 25.0.1364.160

Na rozdíl od ostatních ti poradím.Načti čísloProveď převodvypiš převodPrasatkoPee

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   |  Microsoft Windows 8 Chrome 26.0.1410.64

Tím ho moc nepotěšíš.....když on po nás chtěl ten zdroják. ))

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   |  Linux Chrome 25.0.1364.160

Má postup, to mu musí stačit, ne? )PrasatkoPee

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   |  Microsoft Windows 8 Chrome 26.0.1410.64

No měl by. Ale nějak se nám odmlčel, asi šel loudit o zdroják jinam. By mě zajímalo, co by dělal, když by se ho učitel zeptal, co dělá třeba na tom a tom řádku a on by nevěděl.....

Souhlasím  |  Nesouhlasím  |  Odpovědět




Určitě si přečtěte

Apple: naše mapy budou nejlepší na světě. Tajně jsme na nich pracovali několik let

Apple: naše mapy budou nejlepší na světě. Tajně jsme na nich pracovali několik let

** Apple odhalil své plány na zcela nové mapy ** Několik let pracuje na nových mapách, které by měly předběhnout konkurenci ** Objeví se s příchodem iOS 12 pro vybrané státy

Karel Javůrek | 50

Alan Turing: Genius, který matematicky stvořil počítač

Alan Turing: Genius, který matematicky stvořil počítač

Řešením matematického problému se dostal k modelu teoretického stroje, který nese jeho jméno a je základem logiky univerzálních počítačů.

Pavel Tronner | 57

Sex a rozmnožování při mezihvězdné cestě: Kolik lidí je potřeba pro let k Proximě Centauri?

Sex a rozmnožování při mezihvězdné cestě: Kolik lidí je potřeba pro let k Proximě Centauri?

** Vědci spočítali, jak velká by musela být posádka pro vícegenerační let k nejbližší hvězdné soustavě ** Proxima Centauri se nachází 4,3 světelných let od nás ** Za současných technologií bychom k ní letěli 6300 let

Petr Kubala | 53

Jak dopadl velký den Applu s náloží novinek: Sledujte, co letos připravil

Jak dopadl velký den Applu s náloží novinek: Sledujte, co letos připravil

** Apple večer představil novinky ** Ukáže nové operační systémy, ale čekala se i nová zařízení ** Začíná vývojářská konference Applu WWDC 2018

Karel Javůrek | 87

Takhle zemřete, když asteroid dopadne na vaše město

Takhle zemřete, když asteroid dopadne na vaše město

** Jak by to dopadlo, kdyby na světovou metropoli či do nedalekého moře dopadl velký asteroid? ** Simulovali to odborníci z University of Southampton ** Výsledky jsou velmi zajímavé

Petr Kubala | 32


Aktuální číslo časopisu Computer

Velký test 18 bezdrátových sluchátek

Vše o přechodu na DVB-T2

Procesory AMD opět porážejí Intel

7 NVMe M.2 SSD v přímém souboji