Fracciones definitivo

Proceso Fracciones
Escribir "Ingrese valor 1:";
Leer a;
Escribir "Ingrese valor 2:";
Leer b;
Escribir "Ingrese valor 3:";
Leer c;
Escribir "Ingrese valor 4:";
Leer d;
e<-((a/b)+(c/d));
f<- trunc(e);
Escribir "10/8:", f; Escribir "2/8:", e
FinProceso

Funciones de PSEINT

Función
Significado
RC(X)
Raíz Cuadrada de X
ABS(X)
Valor Absoluto de X
LN(X)
Logaritmo Natural de X
EXP(X)
Función Exponencial de X
SEN(X)
Seno de X
COS(X)
Coseno de X
TAN(X)
Tangente de X
ASEN(X)
Arcoseno de X
ACOS(X)
Arcocoseno de X
ATAN(X)
Arcotangente de X
TRUNC(X)
Parte entera de X
REDON(X)
Entero más cercano a X
AZAR(X)
Entero aleatorio entre 0 y x-1

Clase 29-03-2011

Con el Aporte de Cèsar logramos terminar el ejercicio 3.
Proceso Calculo
Escribir "Ingrese valor 1:";
Leer a;
Escribir "Ingrese valor 2:";
Leer b;
Escribir "Ingrese valor 3:";
Leer c;
Escribir "Ingrese valor 4:";
Leer d;
s<-((a/b)+(c/d));
z<- trunc(s);
Escribir "la suma de fracciones es:", z;
FinProceso