#!/bin/sh
if [ $1 -gt 0 ]
then
   let a=$1
else
   echo -n "A = ";read a;
fi

let fakt=1;
for i in `seq $a`
do
   let fakt=`expr $fakt \* $i`
done
echo $fakt;