Show Por El Dia Del Amor Y La Amistad

Ejemplos de Pseudocódigo

Ejemplo: Realizar el pseudocódigo de un programa que permita calcular el área de un rectángulo. Se debe introducir la base y la altura para poder realizar el cálculo..

Programa; área

Entorno: BASE, ALTURA, AREA son número enteros

Algoritmo:

escribir “Introduzca la base y la altura”

leer BASE, ALTURA

calcular AREA = BASE * ALTURA

escribir “El área del rectángulo es “AREA

Finprograma

Ejemplo: Realizar el pseudocódigo que permita al usuario introducir por teclado dos notas, calculando la suma y el producto de las notas.

Programa: SumaProducto

Entorno: NOTA1,NOTA2,SUMA,PRODUCTO son números enteros

Algoritmo:

escribir “Introduzca las notas”

leer NOTA1,NOTA2

calcular SUMA = NOTA1 + NOTA2

calcular PRODUCTO = NOTA1 * NOTA2

escribir “La suma de las dos notas es:” SUMA

escribir “El producto de las dos notas es :”PRODUCTO

Finprograma

Ejemplo: Realizar el pseudocódigo de un programa que permita saber si un número es mayor, menor o igual a cero.

Programa: ComparaNúmeros

Entorno: NUMERO es un número entero

Algoritmo:

Escribir “Introduzca un número “

leer NUMERO

SI NUMERO>0 ENTONCES

escribir “El número introducido es positivo”

SI NO

SI NUMERO<0 ENTONCES

escribir “El número introducido es negativo”

SI NO

escribir “El número es cero”

FINSI

FINSI

Finprograma

Supongamos un algoritmo que lea las coordenadas de tres puntos y los mueva tres puntos en la coordenada x y escriba el resultado en algún dispositivo de salida:

ALGORITMO lee_tres_vertices

ENTRADA: las coordenadas (x,y) de tres puntos

SALIDA: las coordenadas (x,y) de los tres puntos movidos 3 puntos hacia la derecha.

VARIABLES: i:entera

x,y: real

INICIO

PARA i=1 HASTA 3 CON INCREMENTO +1

ESCRIBE "Abscisa del punto número ", i

LEER x

ESCRIBE "Ordenada del punto número ", i

LEER Y

ESCRIBE "El punto es (" x+3","y")"

FIN_PARA

FIN

El programa equivalente a este algoritmo se muestra a continuación. Como podemos apreciar en un programa en Pascal es importantísimo no olvidar detalles de sintaxis. Por ejemplo cada sentencia termina en punto y coma. De cualquier forma es inmediato apreciar los simples cambios existentes.

program lee_tres_vertices;

var x,y:real;

i:integer;

...