ISRAEL A visit from tens of thousands of migrating pelicans may be a gift for bird-watchers, but for Israeli fish farmers it can be costly. In response, Israeli authorities have taken to feeding the birds to help preserve the farms' stocks.
declare a number; procedure squarenum(x IN OUT number) Is begin x:= x*x; end; begin a:=29; squarenum(a); dbms_output.put_line(' Square of (23): ' || a); END;
declare f number:=&fahrenheit; c number:=&celcius; result number; begin result:=(F-32)*5/9; dbms_output.put_line('the result in celcius is : ' || result); result:=9/5*C+32; dbms_output.put_line('the result in fahrenheit is : ' || result); end;
declare value1 number; value2 number; mytotal number; function myfun(myval1 in number, myval2 in number) return number is total number; begin total := myval1 ** myval2; dbms_output.put_line(total); return total; end; begin value1 :=&val1; value2 := &val2; mytotal:= myfun(value1, value2); end;
Comments
Post a Comment