Lote1
A
10
11
12
13
14
B
100
121
144
169
196
3- Receba um número inteiro. Calcule e mostre o seu fatorial.
algoritmo "exe3" var val,fat,cont: inteiro inicio escreval("digite um valor") leia(val) fat<- 1 para cont de val ate 2 passo -1 faca fat<-(fat * cont) escreval(fat) fimpara fimalgoritmo fluxograma massa de dados val 5
teste de mesa
Val
5
cont
5
4
3
2
Fat
5
20
60
120
4- Receba um número. Calcule e mostre a série 1 + 1/2 + 1/3 + ... + 1/N. algoritmo "exe4 "
// Função :
// Autor :
// Data : 26/03/2015
// Seção de Declarações var r: real cont,n1: inteiro inicio // Seção de Comandos escreval("digite um valor") leia(n1) enquanto n1<0 faca escreval("digite um numero positivo") escreval("digite um valor") leia(n1) fimenquanto para cont de 1 ate n1 faca r<-((1/cont)+r) fimpara escreval(r) fimalgoritmo
fluxograma
Massa de dados
-1 3
Teste de mesa
N1
-3
3
Cont
1
2
3
R
1
1,5
1,83333
5- Receba um número. Calcule e mostre os resultados da tabuada desse número.
Pseudocódigo
algoritmo "exe5" var a,b,c: inteiro inicio escreval("digite um numero que você queira saber a tabuada") leia(b) para a de 0 ate 10 faca c<-(b*a) escreval(b," x ",a," = ",c) fimpara fimalgoritmo
Fluxograma
Massa de dados
B
5
Teste de mesa
A
1
2
3
4
5
B
5
C
5
10
15
20
25
6- Receba 2 números inteiros, verifique qual o maior entre eles. Calcule e mostre o resultado da somatória dos números ímpares entre esses valores.
Pseudocódigo
algoritmo "semnome" var a,b,c,d: inteiro inicio // Seção de Comandos escreval("digite 1º valor") leia(a) escreval("digite 2º valor") leia(b) se a>b entao para c de b ate a faca se c mod 2 = 1 entao d<-(c+d) escreval(d) fimse