Pascal/Turbo Pascal - ayuda turbo pascal

   
Vista:

ayuda turbo pascal

Publicado por ADOLFO DAVID ing_david1988_24@hotmail.es (1 intervención) el 23/02/2013 02:34:41
hola necesito ayuda con turbo pascal para elaborar un algoritmo en turbo pascal el problema es con este problema

Diseñar y codificar un algoritmo que lea dos números enteros num1 y num2 y que calcule e imprima la diferencia, de acuerdo a la forma siguiente.
Mayor de los números ingresado - Menor de los números ingresados



si alguien puede ayudarme mandeme un mensaje a mi correo o mi face usando el mismo correo
ing_david1988_24@hotmail.es
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

ayuda turbo pascal

Publicado por ramon (2072 intervenciones) el 23/02/2013 14:22:31
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
{Algo así}
 
 program resta;
 uses
    crt;
  var
  num, num1, num2 : integer;
 
  begin
     write('Entre El Num. 1 : ');
     readln(num1);
     write('Entre El Num. 2 : ');
     readln(num2);
     writeln;
     if num1 < num2 then
     begin
     num := num2;
     num2 := num1;
     num1 := num;
     end;
     writeln('El Resultado Es : ',num1 - num2);
     writeln;
     writeln('Pulse [Enter]´);
     readln;
   end.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

ayuda turbo pascal

Publicado por Terry noticiasgamerz@gmail.com (1 intervención) el 23/02/2013 17:26:19
tienes que ponerlo en un array ya lo hize y trabaja bien si te interesa contactame a mi correo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar