Язык С++:
#include
using namespace std;
void main(){
int n=5, k, f=1; //f - факториал, n - число, фак-ал которого нужно вычислить
while(k<=n){<br>f*=k;
k++;
}
cout<<"Факториал числа "<<n<<" равен : "<<f<<endl;<br>}
Pascal:
program z4;
var n, k, f: integer;
begin
write('Введите число, для которого нужно вычислить факториал : ');
readln(n);
k:=1;
f:=1;
while(k<=n)<br>begin
f:=f*k;
k:=k+1;
end;
writeln('Факториал равен : ', f);
end.