Algoritmos

Desenvolver um algorítmo para realizar a soma de números harmônicos, sendo n definido pelo usuário.H = 1+1/2+1/3+1/4…+1/n-1+1/n
2.
Calcular a soma dos 50 primeiros termos da série:S = 1/3-2/5+3/7-4/9+5/11-…
3.
Para dado um valor n, inteiro, calcular o fatorial de n, sabendo que:i)_ n!=nx(n-1)x(n-2)x…x2×1ii)_ 0!=1iii)_ (-n)! não existe
4.
Desenvolver 3 algorítmos (um em cada estrutura), que calcule e imprima a soma dos inteiros ímpares de 1 até n, sendo n fornecido como entrada e testado para ser um número ímpar maior do que 1.
5.
Preparar um algorítmo para ler 15 números inteiros e verificar quantos deles são pares
6.
A série de Fibonacci é formada pela seguinte sequência: 1, 1, 2, 3, 5, 8, 13, 21, 34, 55, … Apresentar na tela até o 20º termo da série.
7.
Preparar um algoritmo para entrar com 50 notas válidas (de zero até dez) e apresentar no final a média da turma.
8.
Escrever um algoritmo para ler um conjunto de fichas contendo cada uma a altura e o código do sexo de uma pessoa (1 para masculino e 2 para feminino), calcule e escreva: a maior altura entre as mulheres e a média das alturas dos homens. O final do conjunto é dado por sexo igual a 3.
9.
A Telemar está interessada em um relatório contendo:
a)_ Quantidade total de pulsos residenciaisb)_ Quantidade total de pulsos comerciaisc)_ O código do assinante que consumiu o maior número de pulsos residenciaisd)_ A média de pulsos comerciais
Para isto é feita a leitura de fichas contendo: Código do assinante Quantidade de pulsos Categoria (1 para residencial e 2 para comercial)
O final do conjunto de assinantes é dado por um código de assinante não positivo.
{Resposta questão 1}Algoritmo serie_harmonica;var h:real; i,n:inteiro;inicioescreva (’informe o ultimo denominador:’); leia(n);se(n<=0) entaoescreva (’valor invalido’)senaoinicioh:=0;para i<-1 ate n facah:=h+1/i;escreva(’soma ‘harmonica=’,h);fim;fim.
{Resposta questão 2}Algoritmo soma_serie;var soma:real;