Question

объяснить работу программы для вычисления сколько нулей в факториале (Паскаль)
var
n,x,s: integer;
begin
s:=0;
readln(n);
x:=5;
while x <= n do
begin
inc(s, n div x);
x:= x * 5
end;
writeln(s);
end.

Answer 1

s - это счетчик 
потом читаем n 
x присваиваем значение 5
(цикл) цикл будет работать от x (тоесть от 5) и до тех пор пока n  не будет равно x увиличаем число на определённое значение s(тоесть 0,(то число которое ты ввел)находим целую часть этих чисел при делении на x )
x присваиваем значение x * 5
выводим в s
И программа вообще не работает (что тебе нужно найти?)