TALLER DE ALGORITMOS

Lucas Arenas Arteaga

Lógica de Programación
Rober Restrepo

Universidad Autónoma de Las Américas

Medellín

2010

1- Inicio
A, b, h: Numérico
Lea: A, h
b= (2 * A)/ hImprima: b
Fin

2- Inicio
nom: Alfanumérico
sbash, nht, sbru, bon, ded, sne: Numérico
Lea: nom, sbash, nht
sbru= sbash * nht
Si nht <= 48 entonces
bon= 20.000
Sino
Si nht <= 58 entoncesbon= 50.000
Sino
bon= 100.000
finsi
finsi
Si sbash < 5.000 entonces
ded= 10.000
Sino
Si sbash < 8.000 entonces
ded= 20.000
Sino
ded= 50.000
finsi
finsi
sne= sbru + bon –ded
Imprima: sbru, bon, ded, sne
Fin

3- Inicio
dahañ, smen, minexmen, vgasmen: Numérico
Lea: smen, minexmen, vgasmen
dahañ= smen + minexmen – vgasmen
Imprima: dahañ
Fin

4- Inicio
tiptra, nom,:Alfanumérico
nht, sbash, ded, bon, snet: Numérico
Lea: tiptra
Si tiptra = “Fijo” entonces
Lea: nom, nht, sbash, ded, bon
Sino
Lea: nom, nht
sbash= 6.000
ded= 0
bon= 0
Finsi
snet=(sbash * nht) + bon – ded
Imprima: nom, snet
Fin

5- Inicio
Notaxlav, Nobuslav, Noparlav, Nomotlav, dtax, dbus, dpar, dmot, dtotal, costax, cosbus, cospar, cosmot: Numérico
costax= 3.000, cosbus=10.000, cospar= 5.000, cosmot= 2.000
Lea: Notaxlav, Nobuslav, Noparlav, Nomotlav
dtax= costax * Notaxlav
dbus= cosbus * Nobuslav
dpar= cospar * Noparlav
dmot= cosmot * Nomotlav
dtotal= dtax + dbus +dpar + dmot
Imprima: dtax, dbus, dpar, dmot, dtotal
Fin

6- Inicio
h, b, At, Ac, r, pi: Numérico
pi= 3,14
Lea: h, b, r
At= (b * h) / 2
Ac= pi * (r ^ 2)
Imprima: At, Ac
Fin

7- Inicio
Not1, Not2,Not3, Not4, Notdef: Numérico
Calif: Alfanumérico
Lea: Not1, Not2, Not3, Not4
Si Not1 < Not2 entonces
Not1= Not2
Sino
Not1= Not1
Finsi
Notdef= (Not1 + Not2 + Not3 + Not4) / 4
Si Notdef >=4,5 entonces
Calif= “E”
Sino
Si Notdef >= 4,0 entonces
Calif= “S”
Sino
Si Notdef >= 3,5 entonces
Calif= “B”
Sino
Si Notdef >=3,0 entonces
Calif= “A”
Sino…