Pascal-SC

Sources mentioning this language

Related languages

LLM-contributed programs

program Factorial;
{ This program computes the factorial of a number }

var
  n, i: integer;
  result: real;

begin
  write('Enter a number: ');
  readln(n);
  
  result := 1.0;
  for i := 1 to n do
    result := result * i;
  
  writeln('Factorial of ', n, ' is ', result:0:0);
end.

Real programs from Software Heritage

No SWH evidence indexed yet for this language. (Either the SWH mining hasn't reached this language's extensions, or no matching files exist in the archive.)

Contribute — propose a file extension