6.4.. Izdvojiti cifre dvocifrenog broja. Ispisati prvi cifru desetica pa cifru jedinica. Opis rješenja: Pri pretvaranju se koristi osobina pozicionog sistema. Dvocifren broj Opis programa: Listing programa: PROGRAM P06411109; VAR x, y, broj: INTEGER; BEGIN WRITE('Dvocifren broj '); READLN(broj); y := broj MOD 10; {cifra jedinica} x := broj DIV 10; {cifra desetica} WRITELN('broj=', broj, ' cifra desetica=', x, ' cifra jedinica=', y); READLN; END. Izvođenje programa:
|
|||||||
|