10 Programas Con If

Descargar como docx, pdf o txt
Descargar como docx, pdf o txt
Está en la página 1de 8

10 PROGRAMAS CON IF – BELITO MORAN ROSSBELL

1. PROGRAMA PARA DETERMINAR EL MONTO A PAGAR POR TANTOS CUADERNOS


disp('PROGRAMA PARA DETERMINAR EL MONTO A PAGAR POR TANTOS CUADERNOS')
disp('HAY REBAJA POR COMPRAS MAYOR A 5 CUADERNOS')
cuadernos=input('ingrese el numero de cuadernos:');
costo=cuadernos*25 %coste de cuadernos'
if cuadernos>5; %aplicar 20% de descuento por cantidad'
'con descuento del 20% el costo es'
descuento=((100-20)/100)*costo;
disp([descuento])
end
disp('GRACIAS POR SU COMPRA')
 CORRIENDO PROGRAMA

PROGRAMA PARA DETERMINAR EL MONTO A PAGAR POR TANTOS CUADERNO

HAY REBAJA POR COMPRAS MAYOR A 5 CUADERNOS

ingrese el numero de cuadernos:7

costo =

175

ans =

con descuento del 20% el costo es

140

GRACIAS POR SU COMPRA

2. PROGRAMA PARA ORDENAR TRES NUMEROS EN FORMA ASCENDENTE

%Programa Para Ordenar 3 Números En Forma Ascendente%


disp('INGRESA TRES NUMEROS Y SE ORDENARAN EN FORMA ASCENDETE')
n1=input('ingrese el primer numero:');
n2=input('ingrese el segundo numero:');
n3=input('ingrese el tercer numero:');
if n1 ~= n2 & n2 ~= n3; %restricción para números iguales%
if n1>=n2 & n2>=n3;
disp([n3 n2 n1])
end
if n1>=n2 & n3>=n2 & n1>=n3;
disp([n2 n3 n1])
end
if n2>=n1 & n1>=n3;
disp([n3 n1 n2])
end
if n2>=n1 & n3>=n1 & n2>=n3;
disp([n1 n3 n2])
end
if n3>=n1 & n1>=n2;
disp([n2 n1 n3])
end
if n3>=n1 & n2>=n1 & n3>=n2;
disp([n1 n2 n3])
end
else
disp([n1 n2 n3]) %en caso contrario si son iguales%
end
disp('GRACIAS')
 CORRIENDO PROGRAMA
INGRESA TRES NUMEROS Y SE ORDENARAN EN FORMA ASCENDETE

ingrese el primer numero:pi

ingrese el segundo numero:-1

ingrese el tercer numero:cos(85)

-1.0000 -0.9844 3.1416

GRACIAS

3. PROGRAMA PARA CALCULAR EL ESPACIO EN MRUV

disp('PROGRAMA PARA CALCULAR EL ESPACIO EN MRUV')


vo=input('ingrese la velocidad inicial(m/s) v: ');
t=input('ingrese el tiempo(s) t: ');
if t<0
t=input('ingresar el tiempo(s) valores positivos t: ');
end
a=input('ingrese la aceleración(m/s^2) a: ');
e=vo*t+(1/2)*a*(t^2);
disp('----------------------------------------------------------')
disp(' vo t a e')
fprintf('%5.0f\t',vo);
fprintf('%5.0f\t',t);
fprintf('%5.0f\t',a);
fprintf('%5.0f\n',e);
disp('GRACIAS')
 CORRIENDO PROGRAMA
PROGRAMA PARA CALCULAR EL ESPACIO EN MRUV
ingrese la velocidad inicial(m/s) v: 15
ingrese el tiempo(s) t: 58
ingrese la aceleración(m/s^2) a: 4
----------------------------------------------------------
vo t a e
15 58 4 7598
GRACIAS

4. PROGRAMA PARA SABER ¿QUÉ EQUIPO HA GANADO?


disp('=============================================================')
disp('¿QUE EQUIPO HA GANADO?')
disp('=============================================================')
x= input('GOLES DEL EQ. LOCAL=');
y= input('GOLES DEL EQ. VISITANTE =');
disp('=============================================================')
if x<y
disp('EL EQUIPO LOCAL TIENE :')
disp(x)
disp('EL EQUIPO VISITANTE TIENE :')
disp(y)
disp('COMO EL EQUIPO VISITANTE TIENE MAS GOLES, ES EL GANADOR')
end
if x>y
disp('EL EQUIPO LOCAL TIENE :')
disp(x)
disp('EL EQUIPO VISITANTE TIENE :')
disp(y)
disp('COMO EL EQUIPO LOCAL TIENE MAS GOLES, ES EL GANADOR')
end
if x==y
disp('EL EQUIPO LOCAL TIENE :')
disp(x)
disp('EL EQUIPO VISITANTE TIENE :')
disp(y)
disp('COMO EL EQUIPO VISITANTE Y EL EQUIPO LOCAL TIENEN')
disp('LA MISMA CANTIDAD GOLES, ESTO ES UN EMPATE')
end
disp('=============================================================')
 CORRIENDO PROGRAMA

=============================================================

¿QUE EQUIPO HA GANADO?

=============================================================

GOLES DEL EQ. LOCAL=4

GOLES DEL EQ. VISITANTE =1

=============================================================

EL EQUIPO LOCAL TIENE :

EL EQUIPO VISITANTE TIENE :

COMO EL EQUIPO LOCAL TIENE MAS GOLES, ES EL GANADOR

=============================================================

5. PROGRAMA QUE CALCULA LAS SOLUCIONE REALES DE UNA ECUACION DE SEGUNDO GRADO
AX2+BX+C = 0. EL PROGRAMA DEBE DEVOLVER EL NÚMERO DE SOLUCIONES DISTINTAS (UNA
SI b2-4ac=0, DOS SI b2-4ac>0 NINGUNA SI b2-4ac<0) Y CUALES SON ESAS SOLUCIONES:
disp('================================')
a = input('INGRESE EL VALOR DE A= ');
b = input('INGRESE EL VALOR DE B= ');
c = input('INGRESE EL VALOR DE C= ');
disp('================================')
if (b^2)-(4*a*c)==0
x=-b/(2*a);
disp('TIENE UNA SOLUCION = ')
disp(' X ES IGUAL A :'), disp(x)
else
if (b^2)-(4*a*c)>0
x(1)=-b+sqrt((b.^2)-(4*a*c));
x(2)=-b-sqrt((b.^2)-(4*a*c));
disp('TIENE DOS SOLUCIONES = ')
disp('X1 ES IGUAL A:');
disp(x(1));
disp('X2 ES IGUAL A:')
disp(x(2))
else (b^2)-(4*a*c)<0
clc
disp('================================')
disp('NO TIENE SOLUCION')
end
end
disp('================================')
 CORRIENDO PROGRAMA
================================

INGRESE EL VALOR DE A= 9

INGRESE EL VALOR DE B= 5

INGRESE EL VALOR DE C= 0

================================

TIENE DOS SOLUCIONES =

X1 ES IGUAL A:

X2 ES IGUAL A:

-10

================================

6. PROGRAMA PARA HALLAR EL CUADRANTE DE UN PUNTO X,Y

disp('=======================================')
x=input('PUNTO EN EL EJE X = ');
y=input('PUNTO EN EL EJE Y = ');
disp('=======================================')
if x>0 & y>0
disp('EL PUNTO X ES POSITIVO,')
disp('EL PUNTO Y ES POSITIVO')
disp('Y PERTENECEN AL PRIMER CUADRANTE')
end
if x<0 & y>0
disp('EL PUNTO X ES NEGATIVO,')
disp('EL PUNTO Y ES POSITIVO')
disp('Y PERTENECEN AL SEGUNDO CUADRANTE')
end
if x<0 & y<0
disp('EL PUNTO X ES NEGATIVO,')
disp('EL PUNTO Y ES NEGATIVO')
disp('Y PERTENECEN AL TERCER CUADRANTE')
end
disp('=======================================')
disp('================FIN====================')

 CORRIENDO PROGRAMA
PUNTO EN EL EJE X = -26

PUNTO EN EL EJE Y = -14

=======================================

EL PUNTO X ES NEGATIVO,

EL PUNTO Y ES NEGATIVO

Y PERTENECEN AL TERCER CUADRANTE

=======================================

================FIN====================

7. PROGRAMA PARA SABER SI UN TRIANGULO ES ESCALENO EQUILATERO ISOCELES O


RECTANGULO
disp('====================================================')
a=input('ingrese el primer lado :');
b=input('ingrese el segundo lado :');
c=input('ingrese el tercer lado :');
disp('====================================================')
if a==b & b==c & c==a
disp('EL TRIAGULO ES EQUILATERO')
end
if a==b & a~=c & b~=c
disp('EL TRIANGULO ES ISOCELES ')
end
if a~=b & b~=c & a~=c
disp('EL TRIANGULO ES ESCALENO')
end
if a^2==b^2+c^2 & a>b & c<a
disp('EL TRIANGULO ES RECTANGULO')
end
disp('====================================================')
 CORRIENDO PROGRAMA
====================================================

ingrese el primer lado :5

ingrese el segundo lado :4


ingrese el tercer lado :3

====================================================

EL TRIANGULO ES ESCALENO

EL TRIANGULO ES RECTANGULO

====================================================
8. PROGRAMA PARA HALLAR SI UNA FIGURA ES UN TRIANGULO CUADRADO O POLIGONO
disp('PROGRAMA PARA HALLAR SI UNA FIGURA ES UN TRIANGULO CUADRADO O
POLIGONO')
x=input('Ingrese numero de lados de una figura: ');
disp('****************************************')
if x<3,
disp('La figura es un punto o una linea');
else
if x>2 & x<4,
disp('La figura es un TRIANGULO');
else
if x>3 & x<5,
disp('La figura es un CUADRADO');
else
if x>4,
disp('La figura pertenece a los POLIGONOS');
end
end
end
end
disp('GRACIAS')
 CORRIENDO PROGRAMA

PROGRAMA PARA HALLAR SI UNA FIGURA ES UN TRIANGULO CUADRADO O POLIGONO

Ingrese numero de lados de una figura: 5

****************************************

La figura pertenece a los POLIGONOS

GRACIAS

9. PROGRAMA PARA SABER SI UN VENDEDOR ES EFICIENTE REGULAR O EXTRARDINARIO

disp('PROGRAMA PARA SABER SI UN VENDEDOR ES EFICIENTE REGULAR EFICIENTE O


EXTRAORDINARIO')
z=input('Ingrese numero de clientes: ')
disp('-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-')
if z>0 & z<=10;
disp('El vendedor es:');
disp('NO EFICIENTE');
disp('*¨*¨*¨*¨*¨*¨*¨*¨*¨*¨*¨*¨*¨*¨*¨*¨*¨*¨');
else
if z>10 & z<=20;
disp('El vendedor es:');
disp('REGULAR');
disp('´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´');
else
if z>20 & z<=40;
disp('El vendedor es:');
disp('EFICIENTE');
disp('//////////////////////////////////////');
else
if z>40;
disp('El vendedor es:');
disp('EXTRAORDINARIO');
disp('-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-');
end
end
end
end
disp('GRACIAS')
 CORRIENDO PROGRAMA

PROGRAMA PARA SABER SI UN VENDEDOR ES EFICIENTE REGULAR EFICIENTE O EXTRAORDINARIO

Ingrese numero de clientes: 15

z=

15

-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-

El vendedor es:

REGULAR

´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´´

GRACIAS

10. PROGRAMA PARA SABER SI UN EQUIPO DE FUTBOL JUEGA EN LA CHAMPIONS O EN LA


UEFA SEGÚN SU POSICION EN LA TABLA
disp('PROGRAMA PARA SABER SI UN EQUIPO DE FUTBOL JUEGA EN LA CHAMPIOS O
EN LA UEFA')
P=input('Ingrese la posición en la tabla de un equipo en la primera
división P=');
if P>=1 & P<=4
R=('JUEGAN LA CHAMPIONS')
else if P>=5 & P<=6
R=('JUEGAN LA UEFA')
else if P>=7 & P<=17
R=('PERMANECE')
else P>=18 & P<=20
R=('DESCIENDE')
end
end
end
disp('GRACIAS FUTBOLEROS')
 CORRIENDO PROGRAMA

PROGRAMA PARA SABER SI UN EQUIPO DE FUTBOL JUEGA EN LA CHAMPIOS O EN LA UEFA

Ingrese la posición en la tabla de un equipo en la primera división P=4

R=

JUEGAN LA CHAMPIONS

GRACIAS FUTBOLEROS

También podría gustarte