Помогите, люди добрые <3<hr>
2. program faktorial;
uses crt;
var n,i,k : longint;
begin
writeln('Введите желаемое значение');
readln(n);
k:=1;
for i:=1 to n do k:=k*i;
writeln('Факториал числа ',n,' равен ', k);
end.
Легче уже некуда.
а по проще никак нельзя?)
А если по-проще то я сейчас изменю
да, если можно