Aluno :Mário Nascimento Amora - 9908820
Turma - A
 
 

início;
real l,fa,fb,p,a,x,y,i,s,c,b;
leia l,fa,fb,p;
a=l/100;
y=1:         //um valor inicial qualquer//
Enquanto(y>0000.1) faça{
   x=l/a;
   s=sinh(x);
   c=cosh(x);
   i=(fa*fa)+(2*fa*a);
   b=potência(i,0.5);
   y=(a+fa)*(c-1)-(b*s)+fa-fb;
                      }
i=p*(a+fa);  //reaproveitando a variável i para calcular a tensão máxima//
imprima("A tensão máxima é",i);
fim;