0

Códigos para programar uma calculadora em DELPHI

Calculadora

(CALCULADORA) (colocar o Math em uses) Botão LIMPAR begin; edit1.Clear; end; Botão SAIR Begin close; end; Botão Logx Var x,y:real; begin x:=strtofloat(edit1.Text); y:=log10(x); edit1.Text:=floattostr(y); end; Botão Sen(x) Var x,y,z:real; begin x:=strtofloat (edit1.text); z:=degtorad (x); y:=sin (z); edit1.text:=floattostr(y); end; Botão Tangente… Continue Reading