Цикл с предусловием в языке Pascal (while)

Укажите, значение переменной L после выполнения данного фрагмента программы: L:=1; WHILE L<0 DO L:=L+2;

Укажите, значение переменной К после выполнения данного фрагмента программы: K:=-1; WHILE K<4 DO K:=K+2;

Укажите, сколько раз выполнится тело цикла: L:=10; WHILE L>0 DO L:=L-3;

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

Укажите, сколько раз выполнится тело цикла с данным заголовком: K:=-1; WHILE K<3 DO K:=K+2;