Desarrollar Algoritmos

FUNDAMENTOS DE PROGRAMACION

1.- Deducir los resultados que se obtiene del siguiente algoritmo:
var entero: X, Y, Z
Inicio
x=5
y=20
z=X+Y
escribir (5;20)
escribir(25)
fin
2.- ¿Qué resultados producirá este algoritmo?
var entero: NX, double
inicio
NX=25
doble = NX*2
escribir (25)
escribir (50)
fin
3.- Escribir un algoritmo que calcule y escriba el cuadrado de 243
var entero: N1, N2
inicioN1=243
N2=243*243
escribir(N2)
fin
4.- Escribir un algoritmo que lea un número y escriba su cuadrado
var N1, N2
inicio
leer N1
N2=N1*N1
escribir(N2)
fin

5.- Determinar el área y volumen de un cilindro cuyas dimensiones radio y altura se leen desde el teclado
var double area, volumen, altura, radio, pi
inicio
pi = 3.14159
leer altura
leer radio
area = (2*pi)*r*(altura+radio)
volumen= (pi*(radio*radio))*altura
escribir (“Area= ”área)
escribir (“Volumen= ” + volumen)
fin
6.- Calcular el perímetro y la superficie de un cuadrado dada la longitud de un lado.
var double lado, perímetro, superficie
inicio
leer lado
perímetro = lado*4
superficie = lado*lado
escribir (“Perímetro= “+perímetro)
escribir (“Superficie= “+superficie)
fin
7.- Realizar el algoritmo que sume dos números
vardouble N1, N2, suma
inicio
leer N1
leer N2
suma = N1+N2
escribir (“Resultado =”+suma)
fin





8.- Calcular la superficie de un círculo
var doublé radio, pi, superficie
inicio
leer radio
pi=3.14159
superficie=pi*(radio*radio)
escribir(“Superficie= “+superficie)
fin
9.- Calcular el perímetro y la superficie de un rectángulo dadas la base y la altura del mismo.
var doublé perímetro, superficie,base, altura
inicio
leer base
leer altura
perímetro= (base*2)+(altura*2)
superficie=base*altura
escribir(“Perimetro= “+perímetro)
escribir(“Superficie= “+superficie)
fin
10.- Escribir un algoritmo que lea un nombre de una marca de automóvil seguida del nombre de su modelo e informe del modelo seguido del nombre.
var String marca, modelo
inicio
escribir (“Dame una marca de automóvil”)
leer marcaescribir(“Dame un modelo de automóvil”)
leer modelo
escribir(marca + modelo)
fin






11.- Determinar la hipotenusa de un triángulo rectángulo conociendo las longitudes de los catetos.
var double catady, catopu, catady2, catopu2, hipo, hipo2
inicio
escribe(“Ingrese el valor del cateto adyacente”)
leer catady
escribe(“Ingrese el valor del cateto opuesto”)
leer catopu
catady2 = catady^2
catopu2 =catopu^2
hipo2 = catady2 + catopu2
hipo= sqrt(hipo2)
escribir(“La hipotenusa es “+hipo)
fin
12.- Diseñar un algoritmo que realice la siguiente conversión: una temperatura dada en grados Celsius a grados Fahrenheit:
La fórmula de conversión es F=(9/5)C +32
var double temperatura, celsius, fah
inicio
escribir(“Ingrese temperatura en grados Celsius”)
leer celsius
fah=(9/5)celsius +32
escribir(“Temperaturaen Fahrenheit”+fah)
fin










13.- Diseñar un algoritmo que calcule el área de un triángulo en función de las longitudes de sus lados.
Area=√p(p-a)(p-b)(p-c)
Donde p=(a+b+c)/2 (semiperimetro)
var double lado1,lado2,lado3,área,perímetro
inicio
escribe(“Ingrese lado 1”)
leer lado1
escribe(“Ingrese lado 2”)
leer lado2
escribe(“Ingrese lado 3”)
leer lado3
perimetro=(lado1+lado2+lado3)/2area=√perimetro(perimetro-lado1)(perimetro-lado2)(perimetro-lado3)
escribir(“El área es igual a “+area)
fin
14.- Se desea un algoritmo para convertir metros a pies y pulgadas (1 metro=39.37 pulgadas, 1 pie = 12 pulgadas)
var double metros, pies, pulgadas
inicio
escribe(“Dame el valor de metros”)
leer metros
pulgadas=metros*39.37
pies=pulgadas/12
escribe(“El valor en pulgadas es ”+pulgadas)
escribe(“El valoren pies es ”+pies)
fin







15.- Desarrollar las siguientes conversiones:
a) Leer una cantidad en dólares e imprimir el equivalente en pesos.
b) Leer una cantidad en pesos e imprimir el equivalente en euros
c) Leer una cantidad en libras esterlinas e imprimir el equivalente en pesos.
var double pesos1, pesos2, dólares, euros, libras, pesos3
inicio
escribir(“Ingresar valor en pesos para...