-
Conteúdo Similar
-
Por Leonardo de S. Rosalino
Boa tarde,
Gostaria de saber se tem como excluir a ultima linha gerada após a execução de um cursor.
Ex mais ou menos isso aqui:
declare cursor cur_linha is select 'teste linha' as linha from dual;
arquivo utl_file.file_type;
r cur_linha%rowtype;
l_texto varchar2(108);
l_texto_arq varchar2(108);
begin
--
arquivo:= utl_file.fopen('$DIR', '$NOME_ARQ', 'w');
--
if utl_file.is_open(arquivo) then
open cur_linha;
loop
fetch cur_linha into r;
exit when cur_linha%notfound;
l_texto := rpad(r.linha, 108,' ' );
l_texto_arq := substr(l_texto, 2, 108);
utl_file.put_line(arquivo, l_texto_arq || chr(13));
utl_file.fflush(arquivo);
end loop;
end if;
--
utl_file.fclose(arquivo);
end;
O resultado é um arquivo com duas linhas sendo uma com o conteúdo "teste linha" ao invés de uma linha somente.
-
Por Android
olá estou precisando de uma ajuda com esses exercícios, pois não estou conseguindo fazer... "VisuAlg"
1) O MDC (máximo divisor comum) de 2 números inteiros A e B pode ser calculado pelo seguinte procedimento:
Enquanto B for diferente de zero
R recebe o valor do resto da divisão de A por B
A recebe o valor de B
B recebe o valor de R
Fim Enquanto
Escreva um algoritmo capaz de calcular e mostrar o MDC de 2 números inteiros digitados pelo operador.
_______________________________________________________________________________________________________________
2) Construa uma algoritmo capaz de calcular o valor de S, sabendo-se que S é claculado por:
s=(1/ 1)+(3/ 2)+(5/ 3)+(7/ 4)+(9/ 5)+(11/ 6)+⋯+(99/50)
__________________________________________________________________________________________________________________
3) Construa um algoritmo capaz de receber as coordenadas x e y de dois pontos em um plano cartesiano e calcule a mostre a distância entre eles.
-