Drika5

Olá gente. Preciso da ajuda de vocês. Estou iniciando o Fortran e eu fiz um script (abaixo) que lê um vetor com 22 valores, de forma que alguns valores são 0. O que eu estou tentando fazer é o seguinte: Eu tenho que contar quantos valores existem no meu arquivo diferentes de 0, de forma que ele conte quantos valores consecutivos eu tenho no arquivo e me retorne apenas o último valor da contagem, e quando ele achar o 0 ele tem que reiniciar a contagem. Ou seja, meu arquivo tem os seguintes valores ==> 10, 60, 84, 0, 89, 35, 47, 91, 0, 956, 354, 25, 14, 7891, 1976, 785, 0, 2, 0, 36, 56, 0. O meu script me retorna a seguinte contagem ==> 1, 2, 3, 0, 1, 2, 3, 4, 0, 1, 2, 3, 4, 5, 6, 7, 0, 1, 0, 1, 2, 0. Eu quero que o script retorne os valores ==> 3, 4, 7, 1, 2. (retorne sempre o último valor da conta de cada conjunto de valores diferentes de 0) Se alguém puder me ajudar eu agradeço muito.

Olá gente, eu tenho que fazer um contador em FORTRAN que: Leia valores de 5 em 5, de forma crescente, e escolha o maior valor entre esses cinco numeros que ele leu. Por exemplo, eu tenho um conjunto de 100 valores de uma variável qualquer, eu tenho que ler esses valores de 5 em 5 e tirar os maiores valores desse conjunto de 100. O problema é que eu não sei como fazer o contador de 5 em 5, pois eu tenho que fazer em ordem crescente, da seguinte forma: Conjunto de valores de 1 a 100 Ler 1 2 3 4 5 ==> 2 3 4 5 6 ==> 3 4 5 6 7 ==> ... ==> 96 97 98 99 100 Se fosse para usar o DO, tudo bem, só que quando eu faço DO t=1,100,5 ==> Ele pega os valores individuais, no entanto, 1 ==> 6 ==> 11 ==> ... ==> 100 Então não dá certo