» »

Programček

Programček

tadej123321 ::

Pozdravljeni! Imam težavo, ki pa jo ne znam rešiti. Programski jezik v katerem delam je Pascal.

Rad bi naredil program, ki te vpraša po cifri, ta pa jo nato razbije na posamezne cifre. Se pravi, če vpišemo cifro 321, bo program izpisal cifre 3,2 in 1. Zaenkrat sem nekaj že naredil, vendar ne vem, kje se skriva težava, tako da prosim za pomoč.

program izpiscifre;

        var desetice,n, cifra: integer;
begin
       n:=10;
       writeln('Zapisi cifro, ki zelis da ti jo razbijem: ');
       readln(cifra);
       writeln('Tvoja cifra: ', cifra);
       while desetice>0 do
             begin
             desetice:=cifra mod n;
             writeln(desetice);
             n:=n*1;
             readln
       end;
readln;
end.

WarpedGone ::

1. n:=n*1;
2. po metodi, ki si se je lotil, boš moral tudi že izpisane cifre rezat stran od vhodnega podatka

Mam drug predlog:
- vhodno cifro pretvori v string
- izpisuj posamezne črke stringa
Zbogom in hvala za vse ribe

Zgodovina sprememb…

tadej123321 ::

Ok, nekej maš prou; bom naredu en popravek, ja. Sam glede stringa pa nebi, zatko, ker še nismo tega jemali in nočem prehitevati; raj znam neki bolš, kot pa se nek silim. Tko de če ma še kdo kšno idejo, kako zadevco spravt v pogon kr plis povejte!

HellRaiseR ::

Nekako takole bi šlo:
program izpisicifre;
var cifra : integer;
begin
        writeln('Vpisi cifro');
        readln(cifra);

        while cifra>0 do
        begin
                writeln(cifra mod 10);
                cifra:=cifra div 10;
        end
end.

Zgodovina sprememb…



Vredno ogleda ...

TemaSporočilaOglediZadnje sporočilo
TemaSporočilaOglediZadnje sporočilo
»

Programiranje 1-FRI

Oddelek: Šola
111866 (1306) black ice
»

Java[naloga]

Oddelek: Šola
18881 (688) Bizkit45
»

Algoritmi - diagrami poteka

Oddelek: Šola
222189 (1890) lebdim
»

[Delphi] Pomoč pri reševanju naloge ! Nujno :/

Oddelek: Programiranje
161770 (1360) Suly
»

[Turbo pascal] Max Min tezave

Oddelek: Programiranje
81130 (1003) luli

Več podobnih tem