Вопрос по информатике:

1)Определите значение переменной s после выполнения следующего фрагмента программы:
n := 1;
s := 0;
while n <= 101 do begin
s := s + 7;
n := n + 1
end;

2)Определите значение переменной S после выполнения следующего фрагмента программы:
S:=1; i:=1;
while i < 5 do begin
S := S + i*(i+1);
i := i + 1;
end;

3)Определите значение переменной s после выполнения следующего фрагмента программы:
n := 14;
s := 0;
while n <= 18 do begin
s := s + 25;
n := n + 1
end;