Определите по данной блок-схеме число Х, если Y=14, а Z=16 *

Var n: anrag [0..4] of string =
(0,1,2,3,4,) n, x : 1ntegon: begin writel(r=): readlin (n) x=n mod5
writeln (r=5k 1) n [ x ] , readln :end