Укажите, значение переменной D после выполнения данного фрагмента программы:
N:=10;
D:=0;
WHILE N>0 DO
BEGIN
D:=D+N;
N:=N-3;
END;