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