Помогите решить тест по информатике!!! Даю 100 баллов!!1. Чему будет одинаково

Помогите решить тест по информатике!!!
Даю 100 баллов!!

1. Чему будет равно значение целой переменной a после исполнения этого куска программки?
a:=10;
for i:=1 to 3 do begin
a:=a-2
end;

2. Чему будет равно значение целой переменной a после выполнения этого куска программы?
a:=10;
for i:=0 to 4 do begin
a:=a-i
end;

3. Чему будет равно значение целой переменной a после выполнения этого фрагмента программки?
a:=2;
for i:=0 to 3 do begin
a:=a+i
end;

4. Чему будет равно значение целой переменной a после исполненья этого куска программки?
a:=4;
for i:=1 to 2 do begin
a:=a+a
end;

5. Какое число будет выведено на экран после исполненья этого куска программки?
for i:=2 downto 1 do
write(i);

6. Какое число будет выведено на экран после исполненья этого куска программки?
write(4);
for i:=4 downto 3 do
write(2*i);

7. Какое число будет выведено на экран после выполнения этого куска программки?
write(1);
for i:=3 to 5 do
write(i);