EXEC2

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

algoritmo "semnome"
// Função : 2.	Faça um algoritmo que receba dois números e ao final mostre
// a soma, subtração, multiplicação e a divisão dos números lidos.
// Se o valor da soma for maior que 100 exiba o resultado.
// Autor : FRANCISCO LEANDRO VENCESLAU ALVES
// Data : 10/10/2013
// Seção de Declarações 
var
 SOMA,MULTI,SUB,DIVIS,A,B:REAL
inicio
ESCREVA("DIGITE O PRIMEIRO NÚMERO:")
LEIA(A)
LIMPATELA
ESCREVA("DIGITE O SEGUNDO NÚMERO:")
LEIA(B)
LIMPATELA
SOMA:= A+B
MULTI:=A*B
SUB:=A-B
DIVIS:=A/B
SE SOMA >100 ENTAO
ESCREVAL( "SOMA SUPEROU O VALOR DE 100, VALOR DE SOMA =",SOMA)
FIMSE
ESCREVAL("RESULTADO MULTIPLICAÇÃO:",MULTI)
ESCREVAL("RESULTADO SUBTRAÇÃO:",SUB)
ESCREVAL("RESULTADO DIVISÃO:",DIVIS)
fimalgoritmo