Fórum Debian

Versão Completa: (Código fonte) Converter dolares para real em Pascal
Você está atualmente visualizando uma versão simplificada do conteúdo. Visualizar a versão completa com formatação.
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.
URL de Referência