Algoritmo hipotenusa
escribir
("ingresar el cateto a");
leer
ca;
escribir
("ingrese el cateto o");
leer co;
h<-rc(ca^2+co^2);
Escribir ("la
hipotenusa; "),h;
FinAlgoritmo
Volumen de un cilindro
Algoritmo volumen
escribir("ingrese
la altura del cilindro");
leer
ac;
escribir("radio
del cilindro");
leer r;
v<-(PI*r^2*ac);
escribir("el
volumen; "),v
FinAlgoritmo
Mostrar si un numero es mayor que 17
Algoritmo numeromayor
escribir("ingrese
el numero")
leer n;
nm<-(n>17)
escribir("numero
mayor; "),nm;
FinAlgoritmo