marcog

ex1 Escreva sub rotina que, tendo como argumentos um vetor de números reais e respetiva dimensão, determina e mostra numa MsgBox() a média ponderada dos valores do vetor. Esta média não considera o maior nem o menor valores do conjunto. isto foi o que eu escrevi, sei que está errado e preciso de ajuda urgente Sub media(ByRef v() As Single, dimensao As Integer) Dim s, max, min As Single s = 0 min = v(1) max = v(1) For x = 1 To dimensao If v(x) > max Then max = v(x) End If If v(x) < min Then min = v(x) End If s = s + v(x) - min - max Next media = s / (dimensao - 2) MsgBox ("A média ponderada é" & media) End Sub ex2 Escreva uma funçao que faça a validaçao da nota duma prova, entre 0 e 20 valores. Em seguida escreva uma subrotina que usando a função preencha um vetor com as notas de 40 alunos. o que eu escrevi Function valnota() As Single Dim nota As Single Do nota = Val(InputBox("nota?")) Loop Until nota >= 0 And nota <= 20 valnota = nota End Function Sub alinea3(ByRef valnota() As Single) Dim x As Integer For x = 1 To 40 v(x) = valnota(x) 'nao sei chamar uma funcao Next x End Sub

Oi tenho uma tabela que mostra os níveis mcmmo dos jogadores no minecraft Gostava de saber de podem ajudar a ordenar os dados pela coluna power lvl http://pastebin.com/k06v8YZt resultado http://bladecraft.verygames.net/ws/ Obrigado!

soluçao final $displayWidget .= '<li id="mouw_li"><img src="https://minepic.org/avatar/25/' . $value . '" border="0" title="' . $value . '" alt="avatar_' . $value . '" id="mouw_avatar" />' . $value . '</li>'; obrigado!

Oi tenho esta função que mostra um avatar do minotar, mas parece não estar a funcionar Por isso, queria converte-la para mostrar um avatar do minepic do estilo: https://minepic.org/avatar/25/username if($GetPlayers !== false) { foreach ($GetPlayers as $i => $value) { if($instance['displayAvatar'] !== 1) { $displayWidget .= '<li id="mouw_li"><img src="https://minotar.net/helm/' . $value . '/' . $instance['avatarSize'] . '.png" width="' . $instance['avatarSize'] . '" height="' . $instance['avatarSize'] . '" border="0" title="' . $value . '" alt="avatar_' . $value . '" id="mouw_avatar" />' . $value . '</li>'; } else { $displayWidget .= '<li id="mouw_li">' . $value . '</li>'; } } $resnbPlayer = count($GetPlayers); } else { $displayWidget .= '<li id="mouw_li">' . $instance['ifNoPlayer'] . '</li>'; $resnbPlayer = 0; } Obrigado!