Решить , ! oпределите значение d после выполнения фрагмента программы: d: =3255; f: =d div 15-17; z: =d div (f*5); d: =d mod (z+1);

Vard,f,z: integer;
begin
d:=3255;
f:=d div 15-17;
z:=d div (f*5);
d:=d mod (z+1);
writeln (d);
end.

ответ. 3