Вычислить значение выражения Z, записав формулу по правилам Excel при данных х=-1 и у=0,5. Результат округлить до 2-х знака после запятой

program pr; vars,n: string; c: char; i: integer; beginwriteln('введите имя и фамилию в одной строке'); readln (s); i: =1; while s[i]< > ' ' do i: =i+1; n: =copy(s,1,i-1); writeln(n); readln; end.

var n,z: longint;

begin

  read(n);

  z: =abs(n);

  z: =z-2;

  writeln(z);

end.

якщо загородка - прямокутник,

умовно з - це заєць,

то схема розташування зайців така:

з                          з

                              з

з              з       

три зайці - по кутках, два - біля стінок загородки.

program fraza;

var x,y: string;

begin

writeln('введите название животного: ');

readln(x);

writeln('введите число');

readln(y);

writeln(x, " съест ", y, ' грибов.');

end.