Определите значение переменной f после выполнения фрагмента алгоритма f:=1 начало цикла для i от 1до 5 f:-fxi конец цикла
var
f,i:integer;
begin
for i:=1 to 5 do
f:=-f*i;
write(f);
end.
Вбей в паскаль и он выведет тебе значение f