Hola buenos dias alumnos de la sección 6, esta entrega debe hacerse antes del miercoles. Si se les dificulta la transcripcion lo realizan a lapicero y scanean el archivo y me lo hacen llegar a mi correo.
Ejercicio No. 1:
Diseñe un algoritmo para encontrar el entero positivo más pequeño (ent) para el cual la suma 1 + 2+ 3+ 4...+ ent es menor que limite.
Ejercicio No.2:
Diseñar en el lenguaje pascal una ecuación de segundo grado Ax^2+ Bx +C = 0
Algun comentario haganlo en el Blog.
Entregar en grupos.
Suscribirse a:
Enviar comentarios (Atom)
6 comentarios:
hola buenas tardes esta esta un poco dificil pero buscaremos la manera de resolverlos y hacer una buena definicion de los ejercicios.
Buenas tardes Profesora. Estos ejercicios estan un poco dificiles, pero trataremos todo lo posible de realizatrlos... Estos se nos hacen super complicados porque no tenemos mucha información, solo una guía...
Eury mendoza Sección "6"
Buenos dias profesora, coincido con mis compañeros, están dificiles los ejercicios, pero trataremos de resolverlos a ver como nos va...
Muy buenas tarde profesora espero que este muy bien, mire ya hoy es miércoles y no consigo como hacer ese trabajo que es hasta hoy. Se que también me falta un trabajo que no entregue y he sacado muy bajas notas. Ya no tengo oportunidad de aprobar su materia, prefiero cúrsala el semestre que viene, lo que me da lastima es con los laboratorio que tendría que volver a ver.
Se despide:
electroalfa_13@hotmail.com
buenas noche prpfesora le envie los ejercicios a su correo hotmail, quisiera saber para cuando nos puede dar las notas finales, gracias por todo.
Buenos dias profesora, como no le pudimos enviar los ejercicios a ninguno de sus correos se lo enviamos a traves de este medio.A lo mejor no se logra ver bien porque se corre y no se ve igual que en word. Intentaremos otra vez con los correos. O si usted quiere nos dice si se lo podemos llevar en fisico el viernes.
sección "6"
Delgado Viulman C.I: 15 545 141
González Anyerín C.I: 18 755 552 González Mireya C.I: 15 267 552
1) Diseñe un algoritmo para encontrar el entero positivo más pequeño (ent) para el cual la suma 1 + 2+ 3+ 4...+ ent es menor que limite.
Inicio var
Suma,num, n1, n2, n3, n4…n9, min: entero
Minimo=0
Escribir “introduzca numero positivo”
Leer num
Suma= n1+ n2+ n3…n9
Total_suma = total_suma +suma
Escribir suma
Leer suma
Mientras num >= 0
Si num>min
Entonces min es el mun
Fin si
Leer num
Fin mientras
Escribir “el menor numero entero “ min
Fin.
2) Diseñar en el lenguaje pascal una ecuación de segundo grado Ax^2+ Bx +C = 0
Const
No_solucion=0;
Una_ solución=1;
Dos_soluciones=2;
Function Resolver_eq2ngrado(a, b, c: real; var, x1, x2:real):integer;
Var
Discr:real;//el discriminante
Begin
Discr:= b*b – 4 *a*c;
If discr<0 then
Begin
Resolver_eq2 ngrado:= no_solucion:
End
Else
Begin
If discr: othen
Begin
Resolver_eq2ngrado:=una_solucion;
X1=-b/ (2*a);
X1:=x2; //constancias de que son iguales
End
Else//solo puede ser discr > 0
Begin
Resolver_eq2ngrado:=Dos_soluciones;
X1:=(-b+ sqrt (discr)) / (2*a);
X2:=(-b - sqrt (discr)) / (2*a);
End;
End;
End;
Program tipo function
Const
No_solucion =0;
Una_solucion = 1;
Dos_soluciones= 2;
Function resol eq2ngrado (a, b, c: real ; var x1, x2: real) : integer;
Begin
…// el código de la función esta listada mas arriba
End;
Type
T función= function (a, b, c: real; var x1, x2: real) : integer;
Var
Función: T función;
X1, X2, a, b, c: real;
Begin
Write (‘A : ‘ ); Readln (a) ;
Write (‘B : ‘ ); Readln (b) ;
Write (‘C : ‘ ); Readln (c) ;
Function:=resol eq2ngrado; {asignamos a función la dirección de resolver eq2ngrado}
Case function (a, b,c, X1,X2) of
No_solucion: begin
Writeln ( ‘ esta ecuación no tiene solución real’);
End;
Una_solucion: begin
Writeln (‘una solución: X= ‘ )
End;
Dos_soluciones : begin
Writeln ( ‘ dos soluciones’);
Writeln (‘X1 = ‘ );
Writeln (‘X2 = ‘ );
End;
End;
End.
Publicar un comentario