Укажите знач перемен D
N:=0
D:=1
While N<10DO
BEGIN
N:=N+4
D:=D+N*2
END

0