Lista 03a - DCC/UFMG

More documents

Recommendations

Info

14) Escreva um algoritmo em PORTUGOL que receba quinze números do usuário eimprima a raiz quadrada de cada número.algoritmo L3P014;varinteiro: C;real: VALOR, RAIZ;iníciopara C de 1 até 15 façaleia(VALOR);se ( VALOR >= 0 ) entãoRAIZ ← raiz(VALOR);imprima(RAIZ);senãoimprima("Não é possível calcular a raiz quadrada! Número negativo!");fim-sefim-parafimprogram l3p014;varC: integer;VALOR, RAIZ: real;beginfor C := 1 to 15 dobeginwrite('Digite um valor: ');readLn(VALOR);if ( VALOR >= 0 ) then beginRAIZ := SqRt(VALOR);writeLn(RAIZ:3:2); endelsewriteLn('Nao eh possivel calcular a raiz quadrada! Numero negativo!');end;end.for C = 1 : 15VALOR = input('Digite um valor: ');if ( VALOR >= 0 )RAIZ = sqrt( VALOR );disp( RAIZ );elsedisp('Nao eh possivel calcular a raiz quadrada! Numero negativo!');endendUFMG – ICEx – DCC – Programação de Computadores – 2º. Sem 2005 – David Menoti 14
15) Escreva um algoritmo em PORTUGOL que receba oito números do usuário e imprimao logaritmo de cada um deles na base 10.algoritmo L3P015;varinteiro: C;real: VALOR, LOGX;iníciopara C de 1 até 8 façaleia(VALOR);se ( VALOR >= 0 ) entãoLOGX ← log(VALOR) / log(10);imprima(LOGX);senãoimprima("Não é possível calcular o log na base dez! Número negativo!");fim-sefim-parafimprogram l3p015;varC: integer;VALOR, LOGX: real;beginfor C := 1 to 8 dobeginwrite('Digite um valor: ');readLn(VALOR);if ( VALOR > 0 ) then beginLOGX := Ln(VALOR) / Ln(10);writeLn(LOGX:3:2); endelsewriteLn('Nao eh possivel calcular o log na base dez! Numero negativo!');end;end.for C = 1 : 8VALOR = input('Digite um valor: ');if ( VALOR > 0 )LOGX = log(VALOR) / log(10);disp(LOGX);elsedisp('Nao eh possivel calcular o log na base dez! Numero negativo!');endendUFMG – ICEx – DCC – Programação de Computadores – 2º. Sem 2005 – David Menoti 15
Page 6 and 7: 6) Escreva um algoritmo em PORTUGOL
Page 10 and 11: 10) Escreva um algoritmo em PORTUGO
Page 16 and 17: 16) Criar um algoritmo em PORTUGOL
Page 41 and 42: 41) A série de Fibonacci é formad
Page 43 and 44: 43) A série de FETUCCINE é gerada
Page 45 and 46: 44) Seja a seguinte série:1, 4, 9,
Page 47 and 48: 46) Sendo H = 1 + 21 + 31 + 41 + ..
Page 49 and 50: 48) Faça um algoritmo em PORTUGOL
Page 51 and 52: 50) Faça um algoritmo que:- leia u
Page 53 and 54: 51) O valor aproximado do número
Page 55 and 56: program l3p052;varI, J: integer;X,
Page 57 and 58: 53) Implementar um algoritmo em POR
Page 59 and 60: % I: integer;% X, CS, FAT: real;fpr
Page 61 and 62: program l3p054b;varI: integer;X, E,
Page 63 and 64: program l3p055;varI, J, N: integer;
Page 65 and 66:
56) Escreva um algoritmo em PORTUGO
Page 67 and 68:
57) Escreva um algoritmo em PORTUGO
Page 69 and 70:
%C, NMAT,MNMAT1,MNMAT2: integer;%NO
Page 71 and 72:
algoritmo L3P058;varinteiro: C, IDA
Page 73 and 74:
% C, IDADE,NOTIMO,NRUIM,NPESSIMO,NB
Page 75 and 76:
algoritmo L3P059;varinteiro: C, NAM
Page 77 and 78:
% C, NAM,NAV,NAN,NBM,NBV,NBN,NCM,NC
Page 79:
program l3p060;varC,CPF,NDEP: integ
show all

Lista 03a - DCC/UFMG

You also want an ePaper? Increase the reach of your titles

Delete template?

Save as template?