Problème: conversion du décimal vers le DCB

Fermé
axel20012 Messages postés 2 Date d'inscription mardi 24 janvier 2012 Statut Membre Dernière intervention 26 décembre 2012 - 26 déc. 2012 à 14:31
 hadir kb - 23 janv. 2013 à 21:11
Bonjour,


j'ai un problème je veux un programme en pascal qui convertit un nombre décimal vers le DCB (décimal codé en binaire)
sur 4 bits .j'ai réfléchi mais j'ai pas pu

1 réponse

Salam,
je vous donne la solution en algorithme :)


x<--aléa(5000) + 1
b<--""
repeter
r<-- x mod 2
convch(r,c)
b<-- c + b
x<-- x div 2
jusqu'à (x=0)
b<--"0"+b
valeur(b,y,e)
ecrire(x,"(10)=",y,"(DCB))
0