Atividade Algoristmo

Atividade

1.Faça um algoritmo que leia dois valores numéricos, calcule e exiba a sua media aritmética.

algoritmo " Valores numéricos "

// Função : Calcular e exibe os valores numéricos

// Data : 03/09/2012

// Seção de Declarações

var

a, b, media: real

inicio

// Seção de Comandos

// Faça um algoritmo que leia dois valores numéricos

// Calcule e exiba a sua media aritmética.

escreval (" digite o primeiro é: ")

leia (a)

escreval (" digite o segundo numero é: ")

leia (b)

media<-(a+b)/2

escreval ( "media de a+b é:")

escreval (media)

fimalgoritmo

2.Algoritmo que lê o nome de um aluno, as notas de suas três provas e calcule e exibe a media harmônica das provas.

algoritmo " Média Harmônica "

// Função : Calcular e exibe a média harmônica

// Data : 03/09/2012

// Seção de Declarações

var

nome: caracter

nota1, nota2, nota3, MH: real

inicio

// Seção de Comandos

// Algoritmo que lê o nome do aluno, as notas de suas três provas

// Calcule e exiba a media harmônica das provas.

escreval (" Digite o nome do aluno: ")

leia (nome)

escreval (" Digite o primeiro numero é: ")

leia (nota1)

escreval (" Digite o segundo numero é: ")

leia (nota2)

escreval (" Digite o terceiro numero é: ")

leia ( nota3)

MH <- 3(nota1+nota2+nota3)

escreval ( " O valor da media do aluno é:")

escreval ( " Media harmônica é: ")

escreval ( MH )

fimalgoritmo

3.Um algoritmo que lê o valor do raio e calcule o a área do circulo correspondente.

Algoritmo: "Valor do Raio"

// Função : Calcular a área do circulo

// Data : 04/09/2012

// Seção de Declarações

var

raio, area: real

inicio

// Seção de Comandos

// Algoritmo que lê o valor do raio

// Calcule a área do círculo

escreval (" Digite o valor do raio é: " )

leia (raio)

area <- Pi*Raio^2

escreval ( " Valor da área do circulo é: ")

escreva( area )

fimalgoritmo

4.Construa um algoritmo que, tendo como dados de entrada dois pontos quaisquer no plano, P(x1,y1) e P(x2,y2), escreva d= √((〖x2-x1)〗^2+(y2-y1)^2 ) a distancia entre eles. A formula que tal calculo é:

algoritmo "Distancia dos pontos "

// Função : Calcular a distancia dos pontos.

// Data : 12/09/2012

// Seção de Declarações

var

X1,X2,Y1,Y2,D : REAL

inicio

// Seção de Comandos

// Escreva a distancia entre eles

escreval (" Digite o primeiro termo: ")

leia (X1)

escreval (" Digite o segundo termo: ")

leia(X2)

escreval (" Digite o terceiro termo: ")

leia (Y1)

escreval (" Digite o quarto termo: ")

leia (Y2)

D <- ((X2-X1)^2 + (Y2-Y1)^2)^1/2

escreva (" A distancia entre eles é: ")

escreva(D)

fimalgoritmo

5.Escreva um algoritmo que leia três números inteiros e positivos ( A,B,C) e calcule a seguinte expressão: D=(R+S)/2, onde R= (〖A+B)〗^2 e S=(〖B+C)〗^2.

algoritmo "Calculo das expressão de numeros inteiros"

// Função : Calcular a expressão

// Data : 16/09/2012

// Seção de Declarações

var

a,b,c : inteiro

d,r,s : real

inicio

// Seção de Comandos

escreval (" Calcule a seguinte expressão numérica")

escreval (" Digite o valor de A,B,C: ")

leia (a,b,c)

r <- (a + b)^2

s <- (b + c)^2