practica 6

Problema 1

Problema 2

Problema 3

Pseudocodigo

inicio función tab(real n, entero i);

write i,"  X  ",n" = ",(i*n)

final tab

inicio programa

real n

entero i

char r

r='r'

while(r='R' or r='r')

{

write"Su numero es:"

read n;

for(i=1 to i<=10 step i++)

{

tab(n,i);

}

write"Para repetir precione r";

read r;

}

final programa

Problema 4

  

Pseudocodigo

Inicio platilla funcion despliegue (valor T);

{

write"El valor es:",valor

}

Final despliegue

Inicio programa

ch char

x1 entero 

x2 real

write"FUNCION DESPLIEGUE "

write"Introduce un caracter:"

read ch 

despliegue(ch)

write"Introduce un valor entero:"

read x1

despliegue(x1)

write"Introduce un valor de doble presicion:"

read x2

despliegue(x2)

Final programa



Problema 5

Pseudocodigo

inicio funcion minimo(T,T,T)

write"El Numero Menor es "

if(a<b and a<c)

write a

if (b<a and b<c)

write b

if(c<a and c<b)

write c

fin minimo

inicio programa

 N1,N2,N3 entero
X1,X2,X3 doble precicion 
write "Introduzca tres valores  enteros"
read N1, N2, N3
minimo(N1, N2, N3);
write"Introduzca tres valores de doble presision"
read X1, X2, X3
minimo(X1, X2, X3);

fin programa



Problema 6