Programujete někdo v Pascalu?
Nejsem packalák ale bejzikář, ale toto řešim tak že si vemu číslo, vletim o nekonečný smyčky a v podmínce zjistim není li dělenec menší než dělitel. Pokud ne dělím. Opět zjistím jestli není menší než dělitel, pokud ne dělím dále. V monet kdy je splněna podmínka že dělenec je menší jak dělitel tak to je zbytek. To zapíšu buď do byte nebo single (podle toho jestli vyžaduji podporu desetinných čísel) a počet průchodý cyklem je roven podílu a výsledek si hodim na zobrazovač, nekonečná smyčka končí podmínkou že dělenec je menší jak dělitel...
Souhlasím - 1 • Nesouhlasím
Nahlásit
Pro pascal je to while 'podmínka' do 'cyklus';
pokud budeš potřebovat víc příkazů v cyklu, jako že budeš, tak mu dáš do begin 'příkazy v cyklu' end;
dělení se zbytkem e vlastně opakované odčítání
uděláš si proměnnou jako počítadlo, třeba n, do cyklu dáš příkaz, aby se zvýšila o jednu, to ti počítá počet cyklů, pak tam bude příkaz, který odečte dělitele od toho čísla, které ti zbylo po předchozích odečítání (při prvním průchodu cyklu je to dělenec)
no, a podmínka bude, jestli ještě něco můžeš odečíst, abys nešel přes nulu, tzn. jestli je to číslo, co ti zbylo, větší nebo rovno děliteli
pokud budeš potřebovat víc příkazů v cyklu, jako že budeš, tak mu dáš do begin 'příkazy v cyklu' end;
dělení se zbytkem e vlastně opakované odčítání
uděláš si proměnnou jako počítadlo, třeba n, do cyklu dáš příkaz, aby se zvýšila o jednu, to ti počítá počet cyklů, pak tam bude příkaz, který odečte dělitele od toho čísla, které ti zbylo po předchozích odečítání (při prvním průchodu cyklu je to dělenec)
no, a podmínka bude, jestli ještě něco můžeš odečíst, abys nešel přes nulu, tzn. jestli je to číslo, co ti zbylo, větší nebo rovno děliteli
Přihlas se a napiš svůj názor. Nemáš svůj účet? Zaregistruj se.