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

axel20012 Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -  
 hadir kb -
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

  1. hadir kb
     
    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