Объясните, как записывать эти алгоритмы в Лазарусе, какие кнопки нажимать и что куда вставлять на поле!!!
(Пы.Сы. а то я тупой воробушек)

В какой строке допущена ошибка?
begin
s := 0;
for i: = 1 to 6
begin
s := s + s*i;
end;
end;
2.
Чему будет равняться значение переменной і?
var i, n: integer;
begin
n := 30;
i := 0;
while n <100 do
begin
i := i + 1;
n := n + 30;
end;
3.
В какой строке допущена ошибка?
var i, n: integer;
begin
n := 50;
i := 0;
while <= 180 do
begin
i := i + 1;
n := n + 60;
end;