Обчислить: а) sqr(x) * 2+4-sqr(y) /5 < =2, при х= 0.1, у=-3.4 б) х mod 5 + x / 0.1 = x div 2-3, при х =10

Var
  x, y: real;
  z:integer;

begin
  x := 0.1;
  y := -3.4;
  writeln(sqr(x) * 2 + 4 - sqr(y) / 5 <= 2);
  z := 10;
  writeln(z mod 5 + z / 0.1 = z div 2 - 3);
end.