Lista 4

Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original

4-
 CREATE OR REPLACE FUNCTION porcentagem (valor double precision) RETURNS varchar as $$
 BEGIN
 Raise notice 'O valor anterior é % atual é %', valor, valor *0.8;
 RETURN valor *0.8;
 end; $$
 LANGUAGE PLPGSQL;
 
 select * from porcentagem (10)
 
 5-
 CREATE OR REPLACE FUNCTION porcenta (valor double precision) RETURNS varchar as $$
 BEGIN
 RETURN (valor/120);	
 end; $$
 LANGUAGE PLPGSQL;
 
 select * from porcenta (10)
1-
a)
CREATE OR REPLACE FUNCTION soma (valor double precision) RETURNS double precision as $$
 BEGIN
 RETURN valor /2;
 end; $$
 LANGUAGE PLPGSQL;
 
 select * from soma (20-15)
b)
CREATE OR REPLACE FUNCTION somat (valor double precision) RETURNS double precision as $$
 BEGIN
 RETURN (valor -15/2);
 end; $$
 LANGUAGE PLPGSQL;
 
 select * from somat (20)
 
 c)
 CREATE OR REPLACE FUNCTION multi (valor1 double precision,valor2 double precision,valor3 double precision,valor4 double precision) RETURNS double precision as $$
 BEGIN
 RETURN valor1 * valor2/20 + valor3 / valor4 *2;
 end; $$
 LANGUAGE PLPGSQL;
 
 select * from multi (2,5,30,15) 
 
 d)
 CREATE OR REPLACE FUNCTION multip (valor1 double precision,valor2 double precision,valor3 double precision,valor4 double precision) RETURNS double precision as $$
 BEGIN
 RETURN valor1 / valor2 *2 + valor3 * valor4 /30; 
 end; $$
 LANGUAGE PLPGSQL;
 
 select * from multip (5,20,15,2) 
 
 e)
 CREATE OR REPLACE FUNCTION multa (valor1 double precision,valor2 double precision) RETURNS double precision as $$
 BEGIN
 RETURN valor1 * valor2/100;
 end; $$
 LANGUAGE PLPGSQL;
select * from multa (500,20)
2-
 CREATE OR REPLACE FUNCTION pi (pi double precision, raio double precision) RETURNS double precision as $$
 BEGIN
 RETURN pi*raio^2;
 end; $$
 LANGUAGE PLPGSQL;
select * from pi (3.141592,5)
3-
CREATE OR REPLACE FUNCTION horap (segundos double precision, horas double precision) RETURNS double precision as $$
 BEGIN
 RETURN segundos / horas;
 end; $$
 LANGUAGE PLPGSQL;
 
 select * from horap (5.000,3.600)
 
6-
CREATE OR REPLACE FUNCTION preco (valor double precision, porc double precision) RETURNS varchar as $$
 BEGIN
 RETURN valor/porc;	
 end; $$
 LANGUAGE PLPGSQL;
 
select * from preco (100,0.5)
7-
a)
CREATE OR REPLACE FUNCTION ht (horas double precision,dias double precision,semanas double precision) RETURNS double precision as $$
 BEGIN
 RETURN (horas * dias) * semanas;
 end; $$
 LANGUAGE PLPGSQL;
select * from ht (8,5,4)
b)
CREATE OR REPLACE FUNCTION rstta (salario double precision,dia double precision,horast double precision) RETURNS double precision as $$
 BEGIN
 RETURN (salario/dia) / horast;
 end; $$
 LANGUAGE PLPGSQL;
 
 select * from rstta (1600,20,8)
 
8-
CREATE OR REPLACE FUNCTION graus (c double precision ) returns double precision as $$
BEGIN 
RETURN (9 * c +160)/5 ;
END; $$
LANGUAGE PLPGSQL;
select * from graus(28)
9- 
CREATE OR REPLACE FUNCTION volume (raio double precision, altura double precision)returns double precision as $$
BEGIN
RETURN raio^2 * altura * 3.14159;
END; $$
LANGUAGE PLPGSQL;
select * from volume (5,8)
10-
CREATE OR REPLACE FUNCTION km (tempo double precision, velocidade double precision) returns double precision as $$
BEGIN
RETURN (tempo*velocidade)/12;
END; $$
LANGUAGE PLPGSQL;
select * from km (60,80)
11- CREATE OR REPLACE FUNCTION alun (nome varchar, nota double precision,nota2 double precision, nota3 double precision) returns float as $$
BEGIN 
Raise notice 'A media de Gustavo foi %',nota+nota2+nota3/3;
RETURN (nota+nota2+nota3)/3;
END; $$
LANGUAGE PLPGSQL;
SELECT * FROM alun (6,7,8)
12-
CREATE OR REPLACE FUNCTION quadrado(a integer, b integer) returns double precision as $$
BEGIN
RETURN (a^2)+(2*a*b)+(b^2);
END; $$
LANGUAGE PLPGSQL;
SELECT * FROM quadrado (2,3)
14-
CREATE OR REPLACE FUNCTION alg (val1 double precision, val2 double precision) returns double precision as $$
BEGIN
RETURN (val1+val2)/2;
END; $$
LANGUAGE PLPGSQL;
SELECT * FROM alg (10.8,5.9)
16-
CREATE OR REPLACE FUNCTION kml (vel double precision) returns double precision as $$
BEGIN
RETURN vel/3.6;
END; $$
LANGUAGE PLPGSQL;
SELECT * FROM kml (180)