Cota trigonométrica - FX 880p
10 CLS 20 PRINT "Cotas trig do ponto", 30 INPUT "Ang zenital";Z 40 INPUT "Altura instr";HI 50 INPUT "Altura visada";HV 60 INPUT "Dist horizontal";DI 70 INPUT "Cota estacao";CV 80 DH=DI 90 DN=DH*(1/TANZ) 95 C=0.0000000674*DH^2 100 CE=CV-HV+DN+HI+C 110 PRINT "Cota do Ponto";CE