Fórum Debian
(Código fonte) Converter dolares para real em Pascal - Versão para Impressão

+- Fórum Debian (http://www.forumdebian.com.br)
+-- Fórum: Programação (/forum-5.html)
+--- Fórum: Outras Linguagens (/forum-29.html)
+--- Tópico: (Código fonte) Converter dolares para real em Pascal (/thread-28868.html)



(Código fonte) Converter dolares para real em Pascal - 007Mrkernel - 17/11/2018 14:16

Código:
program reais_dolares;

uses crt;

var reais,dolares,converter:real;


BEGIN
    
  
     reais:=0.23;
     dolares:=4.23;
    
     writeln('Digite o valor do dolar');
     readln(dolares);
     writeln('Digite o valor do real');
     readln(reais);
     converter:=(dolares/reais)/12;
    
     writeln('O valor do real é:',converter:0:0);
     readln;

    
    
END.