Usuario:Fang...:Programacion

De Wikilibros, la colección de libros de texto de contenido libre.

En Phyton[editar]

Ejercicio 2.2[editar]

#Evaluar las raíces de 4, 2 y -1. Calcular la tangente de un ángulo.
# Raíces:
import math
def raiz (x):
return (math.sqrt x)
print raiz (4)
print raiz (2)
print raiz (-1)
math.sqrt(4)
math.sqrt(2)# Tangente de un ángulo:
  1. import math
  2. math.tan(ángulo en radianes)

import math math.tan(math.pi)

math.sqrt(-1)
  1. Tangente de un ángulo:
  2. import math
  3. math.tan(ángulo en radianes)

import math math.tan(math.pi)

# Tangente de un ángulo:
# import math
# math.tan(ángulo en radianes)
import math
print math.tan(math.pi)

Ejercicio 2.3[editar]

#Programa Fahrenheit->Celsius que consume una temperatura medida en Fahrenheit y produce el equivalente Celsius:
def Fa_A_Cel (F):
   return ((F-32)*(5/9))
   print Fa_A_Cel(41)
# Ejemplo:
Fahrenheit_A_Celsius(41)

Ejercicio 2.4[editar]

#Programa dolar->euro que recibe una cantidad en dólares y retorna el equivalente en euros
def Dolar_A_Euro (do):
    return (do*(3313.42/2682.34))
    print Dolar_A_Euro(50)
# Ejemplo: 
Dolar_A_Euro (50)

Ejercicio 2.5[editar]

#Programa triángulo que consume la longitud del lado del triángulo y su altura, retorna el área del    

triángulo.

def triangulo (base,altura):
   return ((base*altura)/2)
   print triangulo (5 , 6)
# Ejemplo:
triangulo (5,6)

Ejercicio 2.6[editar]

#Programa convert3 que recibe 3 dígitos, empezando con el dígito menos significativo, seguido por el siguiente más significativo y asísucesivamente. El programa produce el número correspondiente.
def convert3 (num1,num2,num3):
    return ((num3*100)+(num2*10)+(num1))
    print comvert3 (1 , 2 , 3)
   # Ejemplo:
convert3(1,2,3)

Ejercicio 2.7[editar]

# Evaluar n/3 + 2, n^2 + 10, (1/2)n^2 + 20 y 2 - 1/n; para los
# valores de n=2, n=5, n=9.
def f(n):
    return ((n/3)+2)
print f(n)
print f(2)
print f(5)
print f(9)
def f(n):
    return ((n*n)+10)
print f(2)
print f(5)
print f(9)
def f(n):
    return (((1/2)*n*n)+20)
print f(2)
print f(5)
print f(9)
def f(n):
    return (2-(1/n))
print f(2)
print f(5)
print f(9)

Ejercicio 2.8[editar]

#Programa impuesto que determina el impuesto por el pago bruto. La tasa de impuesto es del 15%. También definir pago-neto, programa que determina el pago que un trabajador recibe por un número de horas trabajadas. Asumiendo una tasa horaria de $12.
def impuesto (pago):
    return (pago*(15/100))
    print impuesto (2000)
def pago (horas):
    return (12*horas)
    print pago (48)
# Ejemplos:
impuesto (2000)
    pago (48)


Ejercicio 2.9[editar]

#Programa suma-monedas, que recibe cuatro números: el número de monedas de $50, $100, $500 y $1000; retorna la cantidad de dinero total.
def suma_monedas (m1,m2,m3,m4):
    return ((m1*50)+(m2*100)+(m3*500)+(m4*1000))
# m1 = número de monedas de $50
# m2 = número de monedas de $100
# m3 = número de monedas de $500
# m4 = número de monedas de $1000
    print suma_monedas (1 , 2 , 3 , 4)
# Ejemplo:
suma_monedas(1,2,3,4)

Ejercicio 2.10[editar]

#En un teatro cada asistente paga $5 por tiquete. Cada función cuesta al teatro $20, más $0.5 por asistente. Desarrolla la funcióntotal-gananciaa, que recibe el número de asistentes y retorna cuántos ingresosse producen.
def ganancia_total (asistentes):
    return ((5*asistentes)-(20+(0.5*asistentes)))
    print ganacia_total (120)

# Ejemplo: 
ganancia_total (120)

En Dr Scheme[editar]

En esta seccion se colocan algunos ejercicio extraidos de la lectura H

Ejercicio 2.1.[editar]

;Descubra si Dr Scheme tiene operaciones para sacar raiz de un numero; para computar el seno de un angulo y para determinar el maximo de dos nuemeros.
; Raíz de un número (sqrt Número). Ejemplo:

(sqrt 25)

; Seno de un ángulo (sin ángulo en radianes). Ejemplo:

(sin (/ pi 2))

; Determinar el máximo de dos números (max num1 num2). Ejemplo:

(max 1 6)

Ejemplo 2.2[editar]

; Evaluar las raíces de 4, 2, -1:

(sqrt 4) (sqrt 2) (sqrt -1)

; Tangente de un ángulo (tan ángulo en radianes). Ejemplo:

(tan pi)

Ejemplo 2.3[editar]

;Defina el programa Fahrenheit->Celsius que consume una temperatura medida en Fahrenheit y produce el equivalente Celsius:

(define (Fahrenheit->Celsius F)

(* (/ 5 9) (- F 32)))

;Ejemplo: Hallar la temperatura en escala Celsius equivalente a 41ºF 

(Fahrenheit->Celsius 41)

(convert-gui Fahrenheit->Celsius)

(convert-repl Fahrenheit->Celsius)

(convert-file "entrada.dat" Fahrenheit->Celsius "salida.dat")

Ejemplo 2.4[editar]

;Defina el programa dolar->euro que consume un número de dólares y produce un equivalente en euros.

(define (dolar->euro d)

(/ (* d 3313.42) 2682.34))

(dolar->euro 50)

Ejercicip 2.5[editar]

;Defina el programa triángulo que consume la longitud del lado del triángulo y su altura y produce el área del triángulo.

(define (area-triangulo lado altura)

(/ (* lado altura) 2))

(area-triangulo 5 6)

;Ejemplo: Calcular el área del triángulo con base 5 y altura 6


Ejercicio 2.6[editar]

;Programa convert3, consume 3 dígitos, empezando con el dígito menos significativo, seguido por el siguiente más significativo y así sucesivamente. El programa produce el número correspondiente.

(define (convert3 num1 num2 num3)

(+ (* num3 100) (* num2 10) num1))

(convert3 1 2 3)


Ejercicio 2.7[editar]

;Evalue las siguientes expresiones  , , ,  para n=2, n-5 y n=9

(define (f n)

(+ (/ n 3) 2))

(f 2)

(f 5)

(f 9)


(define (g n)

(+ (* n n) 10))

(g 2)

(g 5)

(g 9)


(define (h n)

(+ (* (/ 1 2) (* n n)) 20))

(h 2)

(h 5)

(h 9)


(define (b n)

(- 2 (/ 1 n)))

(b 2)

(b 5)

(b 9)

Ejercicio 2.8.[editar]

;Definir el programa impuesto que determina el impuesto sobre el pago bruto. (Taza de impuestos 15%). Definir pago-neto, que determina el pago de un empleado del número de horas trabajadas. (Taza horaria de US$12)

(define (impuesto pago)

(/ (* 15 pago) 100))

(impuesto 2000)

(define (pago-neto horas)

(* horas 12))

(pago-neto 48)

Ejercicio 2.9.[editar]

;Definir el programa suma-monedas, que onsume cuatro números: el número de monedas de $50, $100, $500 y $1000 en una bolsa; produce la cantidad de dinero en la bolsa.

(define (suma-monedas m1 m2 m3 m4)

(+ (* m1 50)(* m2 100)(* m3 500)(* m4 1000)))

(suma-monedas 1 2 3 4)

Ejercicio 2.10.[editar]

;Un teatro tiene una sencilla función. Cada cliente paga US$5 por tiquete. Cada realización cuesta al teatro US$20, más US$8.50 por asistente. Desarrollar la función ganancia-total. Consume el número de asistentes y produce cuántos ingresos producen los asistentes.

(define (ganancia-total asistentes)

(- (* 5 asistentes) (+ 20 (* 8.50 asistentes))))

(ganancia-total 120)

Ejercicio 2.11[editar]

;Evaluar las siguientes expresiones, leer y comprender los mensajes de error:
;(+ (10) 20)
;(10 + 20)
;En las expresiones anteriores se esperaba un nombre u operación definida después del paréntesis, pero se encontró un número 
;(+ +)
;El operador "+" debe estar aplicado a argumentos

Ejercicio 2.12[editar]

;Leer los mensajes de error al ejecutar las siguientes expresiones y fijar la definición apropiada.
;(define (f 1)(+ x 10))

;La definición de la función debe estar entre paréntesis; se requiere el nombre del primer argumento de la función (x), pero en su lugar hay un número (1).
;(define (g x) + x 10)

; Falta un paréntesis antes del operador "+" y otro para cerrar la definición de la función
; (define h(x)(+ x 10))

; x no está definido, no es un argumento
; La definición correcta sería:

(define (i x)

(+ x 10))

Ejercicio 2.13[editar]

; Evaluar las siguientes expresiones gramaticalmente legales:
;(+ 5 (/ 1 0)): Division por cero
;(sin 10 20): El seno solo espera un argumento y recibe 2 (10 20)
;(somef 10): Hace referencia a una "función" indefinida

Ejercicio 2.14[editar]

; Ejecutar el siguie(+ 5 (/ 1 0nte programa y evaluar (somef 10 20) y (somef 10) en la ventana de Interacciones:

(define (somef x)

(sin x x))

; En la definición de la función somef recibe un solo parámetro y en la expresión (somef 10 20) la función recibe 2 argumentos
; En la función, el seno recibe 2 argumentos y según su definición solo recibe un argumento (en radianes)