2013_2_CST_ADS_2_Construcao_Algoritmos (2013) ETAPA Aluno

Passo 1 (Aluno)

Problema 1

var

impar:vetor [1..99] de inteiro

cont, cont1, num1, num2, soma:inteiro

inicio

Escreva(“Numero inicio: “)

leia(num1)

Escreva(“Numero fim: “)

leia(num2)

se(num1<num2)entao

cont<-num1

enquanto cont<num2 faca

escreval(cont mod 2)

se(cont mod 20)entao

cont1<-cont1+1

impar[cont1]<-cont

soma<-soma+cont

fimse

cont<-cont+1

fimenquanto

limpatela

Escreval("Valores lidos: ",num1," ",num2)

Escreva ("Saida: ")

para cont de 1 ate cont1 faca

Escreva(impar[cont]," ")

fimpara

Escreval("")

Escreval("Soma: ",soma)

senao

cont<-num2

enquanto cont<num1 faca

se(cont mod 20)entao

cont1<-cont1+1

impar[cont1]<-cont

soma<-soma+cont

fimse

cont<-cont+1

fimenquanto

limpatela

Escreval("Valores lidos: ",num1,", ",num2)

Escreva ("Saida: ")

para cont de 1 ate cont1 faca

Escreva(impar[cont]," ")

fimpara

Escreval("")

Escreval("Soma: ",soma)

fimse

// Seção de Comandos

Fimalgoritmo

Entrada

Var

num1, num2, soma: inteiro

resultado: real

inicio

// Seção de Comandos

escreva("Digite o primeiro número: ")

leia(num1)

escreval

escreva("Digite o segundo número: ")

leia(num2)

escreval

se (num1 mod 2 = 1) e (num2 mod 2 = 1)entao

soma <- num1 + num2

senao

escreval("Um dos números digitados é par!")

fimalgoritmo

fimse