TrabalhosGratuitos.com - Trabalhos, Monografias, Artigos, Exames, Resumos de livros, Dissertações
Pesquisar

A Linguagem de Programação

Por:   •  31/10/2018  •  Trabalho acadêmico  •  338 Palavras (2 Páginas)  •  143 Visualizações

Página 1 de 2

Colégio Estadual Malba Tahan

Isabelly da Cruz Cassaro nº:21

Avaliação de Linguagem e Programação

Professor Ederson Gomes

Altônia, Paraná

2018

Colégio Estadual Malba Tahan

1-Faça um algoritmo que calcule o quadrado da diferença entre dois valores.

algoritmo "exercício1"

var

a,b:real

quadDif,difQuad:real

inicio

escreval("Digite um número:")

leia(a)

escreval("Digite um número:")

leia(b)

quadDif <- quad(a-b)

difQuad <- quad(a)-Quad(b)

escreval("O quadrado da diferença é:", quadDif)

escreval("A diferença dos quadrados é:", difQuad)

fimalgoritmo

2-Faça um algoritmo que calcule a média simples de dois valores.

algoritmo "exercício2"

var

nota1,nota2,media:real

inicio

escreval("Informe a primeira nota: ")

leia(nota1)

escreval("Informe a segunda nota: ")

leia(nota2)

media <- (nota1+nota2)/2

escreval("O valor da média é: ", media)

fimalgoritmo

3-Faça um algoritmo que converta reais em dólares. (Valor Dólar R$3,80)

algoritmo "exercíco3"

var

valor:real

inicio

leia(valor)

escreval(valor/3.8 , "dólares")

fimalgoritmo

4-Faça um algoritmo que informe os números lidos em ordem crescente.  

algoritmo "exercício4"

var

a,b,c:inteiro

inicio

escreval("Entre com o primeiro número natural:")

leia(a)

escreval("Entre com o segundo número natural:")

leia(b)

escreval("Entre com o terceiro número natural:")

leia(c)

se (a>b)e (b>=c) entao

escreval(c,b,a)

senao

se (b>=a)e(b>c)e(a>=c)entao

escreval(c,a,b)

senao

se(b>a)e(b>=c)e(a<=c)entao

escreval(a,c,b)

senao

se (b>a)e(b<=c)entao

escreval(a,b,c)

senao

se(b

escreval(b,a,c)

senao

se(b

escreval(b,c,a)

senao

escreval(a,b,c)  

fimse

fimse

fimse

fimse

fimse

fimse

fimalgoritmo

5-Faça um algoritmo que informe se uma nota é válida ou não entre 0 e 10.

algoritmo "atividade5"

var

numero:real

inicio

escreval("Digite um numero:")

leia(numero)

se(numero>=0)e(numero<=10)entao

escreval("A nota é válida:")

senao

escreval("A nota não é válida:")

fimse

fimalgoritmo

6-Faça um algoritmo que leia dados de um triângulo e informe seu tipo (equilátero ou isósceles).

algoritmo "ativiade6"

var

lado1, lado2, lado3: inteiro

inicio

escreval("Digite o lado 1 do triângulo: ")

leia(lado1)

escreval("Digite o lado 2 do triângulo: ")

...

Baixar como (para membros premium)  txt (4.2 Kb)   pdf (43.1 Kb)   docx (12.2 Kb)  
Continuar por mais 1 página »
Disponível apenas no TrabalhosGratuitos.com