Вторую и третию задачу
сделать в паскале
(первую НЕ надо)

                                         PascalABC.NET                                          

Задание 2:

##var s := 8;for var i := 1 to 9 do  s += 8 + 2*i;s.Print

  или

## ArrGen(10, 8, x → x+2).Sum.Print

Задание 3:

##var (n, s) := (1, 1);while s<100 do  (n, s) := (n+1, s*2+n+1);n.Print