Tutoriales de pascal

Calcula el factorial de un numero en pascal

Este programita calcula en factorial de un numero utilizando procedimientos en pascal.

uses
 crt;
var
 contador,numero,factorial:longint;

procedure factorial(var n:integer);
 begin
  for contador:=1 to n do
    factorial:=factorial*contador;
  n:=factorial;
 end;

begin
 clrscr;
 Write('Numero: ');Realn(numero);
 factorial(numero);
 readkey;
end.

Autor: elgame

Comentarios en "Calcula el factorial de un numero en pascal"

Table 'programa_programas.t_comentarios' doesn't exist