function somename(x:integer):real;
var 
  y: real;
  
begin
  y := 10.0;
  somename := x * y;
end;