Stránka 1 z 1
Vypsat, z jakých cifer se skládá zadané číslo v Delphi
Napsal: pát 14. říj 2011, 00:09
od priknprikn
Posím potřebuji pomoct, dostali jsme za úkol v Delphi (Borland Delphi 7):
Vypsat, z jakých cifer se skládá zadané číslo. Například číslo 2588 se skládá z cifer 2, 5 a 8.
Re: Vypsat, z jakých cifer se skládá zadané číslo v Delphi
Napsal: pát 14. říj 2011, 08:22
od Maranov
Pseudokód:
Kód: Vybrat vše
// pole použitých cifer
Boolean cifry[10];
// vynulování pole na počátku
for (int i = 0; i < 10; i++)
cifry[i] = false;
// zjištění cifer
do
{
cifry[číslo % 10] = true; // operace číslo % 10 navrátí poslední cifru (zbytek po dělení), danou cifru označíme jako použitou
číslo /= 10; // číslo zmenšíme o tu cifru, kterou jsme již zaznamenali
} while (číslo != 0) // pokud cifry dojdou, končíme
// výpis výsledků
print("Číslo " + číslo + " se skládá z cifer: ");
for (int i = 0; i < 10; i++)
if (cifry[i])
print(i + " ");
proměnná /= 10; je zkrácenina pro proměnná = proměnná / 10;
% je operace modulo - zbytek po dělení
i++ je zkrácenína pro i = i + 1