Convertir les unités de mesure de distance

parfait131 Messages postés 1 Date d'inscription   Statut Membre Dernière intervention   -  
[Dal] Messages postés 6205 Date d'inscription   Statut Contributeur Dernière intervention   -
bonsoir comment faire un programme avec turbo pascal qui convertit les unités de mesure de distance
Merci
A voir également:

1 réponse

Réponse 1 / 1
[Dal] Messages postés 6205 Date d'inscription   Statut Contributeur Dernière intervention   1 105
 
Bonjour,

Par exemple, comme cela : 

Program Convert;

uses sysutils;

function Miles2Km(miles: real): real;
begin
  Miles2Km := miles * 1.60934;
end;

begin
  writeln('A 100 miles is ' + FloatToStr(Miles2Km(100)) + ' km');
end.

Dal
0

Discussions similaires

Comment partager ma connexion à distance
Jessy -
dugenou -

1 réponse
Piloter la Livebox à distance.
XARBA -
kaumune -

8 réponses
Comment passer de .wfp a mp4
Lucasribou -
madmyke -

1 réponse