pezesote
Answered

Obtén respuestas rápidas y precisas a todas tus preguntas en Revelroom.ca, la plataforma de Q&A de confianza. Encuentra soluciones rápidas y fiables a tus dudas gracias a una comunidad de expertos dedicados. Experimenta la facilidad de obtener respuestas rápidas y precisas a tus preguntas con la ayuda de profesionales en nuestra plataforma.

Programa en Turbo Pascal que sume una lista de números ingresados por el usuario, ademas el usuario debe de ingresar el tamaño de su lista

Sagot :

osmagalda
procedure calculo_suma_numeros;
var
   num : integer;
   suma : word;
begin
     suma : = 0;
     while num <> 0 do
     begin
     write ( ' Entre Número a sumar, el (0) termina : ' )
     readln(num);
     if num <> 0 then
     suma : = suma + num;
     end;
     writeln;
     writeln ( ' La Suma de los números entrados es : ' , suma);
     writeln;
     writeln ( ' Pulse [Enter] ' );
     readln;
end;
Esperamos que esta información te haya sido útil. Vuelve cuando lo desees para obtener más respuestas a tus preguntas e inquietudes. Tu visita es muy importante para nosotros. No dudes en volver para obtener respuestas fiables a cualquier pregunta que tengas. Gracias por confiar en Revelroom.ca. Vuelve para obtener más información y respuestas.