Какое число будет напечатано на экране в результате выполнения фрагмента програм...

March 2022 0 3 Report

Какое число будет напечатано на экране в результате выполнения фрагмента программы? Паскаль
P:=30;
FOR K:= 3 DOWNTO 1 DO
P:=P - K;
WRITE(P);