98 баллов, информатика
1)Дана последовательность операторов, вычисляющих n! (факториал числа n):

k:= 0; f:= 0;
repeat f = f * k;
k:= k + 1;
until k = n;
которая содержит пять ошибок. Найдите ошибки и их исправьте.
2)k:= 1; f:= 0;
while k < n do f := f * k;
k:= k + 1;
3)p:=n;
while p>= 0 do
begin
a:=a + p mod 10;
p:= p div 10
end
4)p:=n;
while p>= 0 do
begin
a:=a + p mod 10;
p:= p div 10
end

1)k:= 1; f:= 1;repeat f := f * k;k:= k + 1;until k > n;2)k:= 1; f:= 1;while k <= n do  begin f:= f * k; k:= k + 1; end;3)p:=n;while p > 0 dobegina:=a*10 + p mod 10;p:= p div 10;end;4)как 3)