Algoritmo Calculadora;
FUNÇÃO Soma( NEUTRO ) : REAL;
FUNÇÃO Subtrair( NEUTRO ) : REAL;
FUNÇÃO Multiplicar( NEUTRO ) : REAL;
FUNÇÃO Dividir( NEUTRO ) : REAL;
{------------------------------------------------------------------------------}
Principal( NEUTRO )
VAR:
Rec_OpUser : INTEIRO;
INICIO
ESCREVA( "Bem-vindo a Calculadora! " );
ESCREVA( "O que você deseja fazer? " );
ESCREVA( "1- Somar." );
ESCREVA( "2- Subtrair." );
ESCREVA( "3- Multiplicar." );
ESCREVA( "4- Dividir." );
LEIA( Rec_OpUser );
CASO Rec_OpUser :
INICIO
SEJA 1:
Somar( );
SEJA 2:
Subtrair( );
SEJA 3:
Multiplicar( );
SEJA 4:
Dividir( );
SEJA_NENHUM:
ESCREVA( "A opção escolhida é invalida!!" );
Principal( );
FIM
RETORNE( 0 );
FIM
{------------------------------------------------------------------------------}
FUNÇÃO Soma( NEUTRO ) : REAL
