dados 2 numeros

Ver el tema anterior Ver el tema siguiente Ir abajo

dados 2 numeros

Mensaje  Admin el Sáb Feb 12, 2011 10:17 pm

dados 2 numeros mostrar la suma, resta, multiplicacion.

program ejercicio3;
uses crt;
var
a,b,c,d,e:integer;

begin
clrscr;
Writeln('diga el primer numero:');
readln(a);
Writeln('Diga el segundo numero:');
readln(b);
c:=a+b;
d:=a*b;
e:=a-b;
Writeln('la suma es:',c);
writeln('la resta es:',e);
Writeln('multiplicacion es:',d);
readkey;
end.


--------------------------------
program ejercicio3;
uses crt;
var
a,b,c,d,e:integer; {todas las variables a utilzar,}

begin
clrscr;
Writeln('diga el primer numero:'); {se escribe Writeln para hacer la proxima lectura en la linea de abajo}
readln(a); {seguimiento a Writeln}
Writeln('Diga el segundo numero:');
readln(b); {el segundo numero se le asignara a la variable (b)}
c:=a+b; {a la variable (c) se le asignara o dara el valor de la suma de la variable (a) y (b)}
d:=a*b; {a la variable (d) se le asignara o dara el valor de la multiplicacion de la variable (a) y (b)}
e:=a-b; {a la variable (e) se le asignara o dara el valor de la multiplicacion de la variable (a) y (b)}
Writeln('la suma es:',c); {Se mostrara el resultado de la variable (c)}
writeln('la resta es:',e); {Se mostrara el resultado de la variable (e)}
Writeln('multiplicacion es:',d); {Se mostrara el resultado de la variable (d)}
readkey;
end.

Nota: recuerde que para asignar a una variable algun valor es ( := ) que quiere decir asignacion

Admin
Admin

Mensajes : 5
Fecha de inscripción : 12/02/2011

Ver perfil de usuario http://pascal.forovenezuela.net

Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba

- Temas similares

 
Permisos de este foro:
No puedes responder a temas en este foro.