function calcula(x,y,z,w:Float):float begin result := ((((x*y))/z)potência w) >Esta função recebe uma expressão, exemplo ((10*5)/2)^3, e calcula end;
Faltou a potência, mas acho que na classe Math do delphi deve ter isso ai ---------------------------------------------------------------------------------------- Uberdam Cavaletti Formado em Tecnologia da Informação - Unoesc - Xxe Pós-graduado em desenvolvimento Java - Unoesc - Xxe http://www.curricular.com.br/berdam Visite http://passandoveneno.blogspot.com ---------------------------------------------------------------------------------------- --- Em sex, 11/7/08, Jackson Gomes - Tools&Comps <[EMAIL PROTECTED]> escreveu: De: Jackson Gomes - Tools&Comps <[EMAIL PROTECTED]> Assunto: Re: [delphi-br] Criar função Para: delphi-br@yahoogrupos.com.br Data: Sexta-feira, 11 de Julho de 2008, 8:48 > Estou necessitando criar uma função para resolver equações matemáticas. >Esta função recebe uma expressão, exemplo ((10*5)/2)^3, e calcula retornando o >resultado. >Alguém ja fez algo assim. Procure por TMathParser no google. Jackson Gomes Tools&Comps - Controle de Usuários para Desenvolvedores CodeGear Web Site: http://www.toolsand comps.com Nosso Fórum: http://groups. yahoo.com/ group/toolsandco mps e-mail: [EMAIL PROTECTED] ps.com Fone: 27 3389 1138 - 8811 0324 ------------ --------- --------- --------- --------- --------- - Devhost - Webhost para desenvolvedores Delphi http://www.devhost. com.br [EMAIL PROTECTED] com.br Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]