👤
TAHIRAENPERSONNVIZ
résolu

Tcs ecrire un programme en turbo pascal permettant de calculer la valeur absolue d'un reel svp aidez moi

Répondre :

PROGRAM Val_Abs;
 VAR x : REAL;
 BEGIN WRITELN('Calcul de la valeur absolue.');
 WRITE('Introduisez x:');
 READLN(x);
 IF x>0 THEN WRITELN('Valeur absolue = ', x)
 ELSE IF x=0 THEN WRITELN('Valeur absolue = ', 0)
      ELSE WRITELN('Valeur absolue = ', -x)
 END.

Bonne journée.
Merci d'avoir visité notre site Web, qui traite d'environ Informatique. Nous espérons que les informations partagées vous ont été utiles. N'hésitez pas à nous contacter pour toute question ou demande d'assistance. À bientôt, et pensez à ajouter ce site à vos favoris !


Viz Asking: D'autres questions