Question

Какое значение примет переменная х в результате выполнения следующих фрагментов программ?
1) x:=1; while x<10 do x:=x+3; x:=x+1;
2) x:=1; while x<10 do begin x:=x+3; x:=x+1; end;
3) x:=0; for y:=1 to 9 do x:=x+1;
4) x:=1; for y:=1 to 5 do x:=x*y;