to berechnequadrat :x
  output :x * :x
end