Помогите пожалуйста с информатикой (на паскале). Буду очень признателен. 8 класс

Задание 1.

Как досадно бы это не звучало, даже не предполагаю, что здесь надобно сделать

Задание 2.

Блок-схема на первой картинке

Задание 3.

var y: real;

x, a, b, c: integer;

begin

   a:=-5;

   b:=5;

   c:=5;

   while a lt;= b do

   begin

       x:=a;

       if x lt;= 0 then

           y:=5 - sqr(x) / 2;

       if x gt; 0 then

           y:=2 / sqr(x);

       writeln('x = ', x, '; y = ', y);

       a += c;

   end;

end.

Задание 4.

Трассировочная таблица на второй картинке.