Требовалось написать программу вычисления факториала числа n (факториал числа n есть...

Question

Требовалось написать программу вычисления факториала числа n (факториал числа n есть произведение всех целых чисел от 1 до n). Программист торопился и написал программу неправильно. Ниже приведён фрагмент его программы, в котором содержится пять ошибок:

к := 1;
f := 0;
while k f:=f * k;
к:=к + 1

Найдите ошибки. Допишите необходимые операторы и выполните программу на компьютере.
Пример входных данных

Пример входных данных Пример выходных данных
Введите n> 5 5!=120
Введите n> 6 6!=720

Answer 1

Var n,k,f:integer;
begin
write('n='); readln(n);
k:=1;
f:=1;
while k<=n do <br> begin f:=f*k; k:=k+1; end;
writeln(n,'!=',f);
end.

Comments

а какие 5 ошибок?

---

Сравните 2 программы. Там, где эти программы отличаются - там и ошибки