Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
#include<stdio.h>
#include<conio.h>
#include<stdlib.h>
#include<string.h>
#include<locale.h>
#define MAX 50
struct nodo {
char simbolo;
struct nodo *sig;
};
struct nodo *raiz=NULL;
void insertar(char x)
{
struct nodo *nuevo;
nuevo = malloc(sizeof(struct nodo));
nuevo->simbolo = x;
if (raiz == NULL)
{
raiz = nuevo;
nuevo->sig = NULL;
}
else
{
nuevo->sig = raiz;
raiz = nuevo;
}
}
char extraer()
{
if (raiz != NULL)
{
char informacion= raiz->simbolo;
struct nodo *bor = raiz;
raiz = raiz->sig;
free(bor);
return informacion;
}
else
{
return -1;
}
}
void liberar()
{
struct nodo *reco = raiz;
struct nodo *bor;
while (reco != NULL)
{
bor = reco;
reco = reco->sig;
free(bor);
}
}
int vacia()
{
if (raiz == NULL)
return 1;
else
return 0;
}
void cargarCadena(char *cadena)
{
printf("Ingrese la cadena: ");
gets(cadena);
}
int verificarCaracteres(char *cadena)
{
int i, j=0;
char tmpCad[MAX];
for (i=0;i<strlen(cadena);i++)
{
if (cadena[i]=='.')
{
exit( 0 );
return 0;
}
else
{
if (cadena[i]=='!')
{
tmpCad[j] = cadena[i];
tmpCad[j] = '\0';
puts(tmpCad);
return 0;
}
//
}
//j++;
}
if (vacia())
{
return 1;
}
else
{
return 0;
}
}
int main()
{
setlocale(LC_ALL, "spanish");
char cadena[MAX];
char tmpCad[MAX];
cargarCadena(cadena);
if (verificarCaracteres(cadena))
{
printf("Proceso finalizado con éxito");
}
else
{
printf("La cadena esta vacia");
}
liberar();
getch();
return 0;
}
Citar
Si el carácter es '@', eliminar la última palabra. Por ejemplo, si se tiene la cadena "cadena de caracteres yu378", la última palabra es "yu378".
Si el carácter es ',', se elimina el último carácter.
Si el carácter es '!' se eliminan todos los caracteres que se hayan introducido.
Si el carácter es '.' se termina el programa.
Por cada operación realizada se deben mostrar los caracteres que queden
CitarPero no se si lo este aplicando bien, aunque el programa no me arroja advertencias o errores.
Si el carácter es '!' se eliminan todos los caracteres que se hayan introducido.
Si el carácter es '.' se termina el programa.
void menuOrdenDescrp()
{
Producto *productos;
int numeroProductos;
int pos,i,j;
char min[MAX];
struct producto temp;
system("cls");
tituloPrincipal();
productos = obtenerProductos(&numeroProductos); /* Retorna un vector dinámico de productos */
if (numeroProductos == 0) {
printf("\n\tEl archivo está vacío!!\n");
system("pause>nul");
} else {
/* Se recorre el vector dinámico de productos */
for (i = 0; i<numeroProductos-1; i++)
{
strcpy(min, productos[i].descripcion);
pos=i;
for (j=i+1; j<numeroProductos-1; j++)
if (strcmp(productos[j].descripcion , min) < 0)
{
strcpy(min, productos[j].descripcion);
pos=j;
}
}
temp=productos[i];
productos[i]=productos[pos];
productos[pos]=temp;
printf("\n\tDatos ordenados:\n");
for(i=0; i<numeroProductos; i++)
{
printf("\n\t%s\n",productos[i].descripcion);
}
}
getchar();
}
![:-\](https://forum.elhacker.net/Smileys/navidad/undecided.gif ":-\")
void menuOrdenDescrp()
{
Producto *productos;
int numeroProductos;
int i,j,pos;
char min[MAX];
struct producto temp;
system("cls");
tituloPrincipal();
productos = obtenerProductos(&numeroProductos); /* Retorna un vector dinámico de productos */
if (numeroProductos == 0) {
printf("\n\tEl archivo está vacío!!\n");
system("pause>nul");
} else {
/* Se recorre el vector dinámico de productos */
for (int i = 0; i < numeroProductos-1; i++)
{
strcpy(min, productos[i].descripcion);
pos=i;
for (int j=i+1; j < numeroProductos; j++)
if (strcmp(productos[j].descripcion , min) < 0)
{
strcpy(min, productos[j].descripcion);
pos=j;
}
temp=productos[i];
productos[i]=productos[pos];
productos[pos]=temp;
}
printf("Datos ordenados:");
for(i=0; i<numeroProductos; i++)
{
printf("%s",productos[i].descripción);
}
}
system("pause>nul");
}
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <locale.h>
#define MAX 80
#define VALOR_CENTINELA -1
/* Estructuras */
struct producto {
int codigo;
char nombre[MAX];
char descripcion[MAX];
char laboratorio[MAX];
float costo;
float precio;
int cantidad;
};
typedef struct producto Producto;
/* Opciones del Menú */
void menuPrincipal();
void menuInsertar();
void menuBuscarClave();
void menuBuscarDescripcion();
void menuUtilidad();
void menuMuestras();
void menuEliminar();
void menuMostrar();
void menuModificar();
void menuEliminarFisica();
void menuStockMinimo();
/* Funciones para manejar el archivo directamente */
Producto *obtenerProductos(int *n); /* Obtiene un vector dinámico de productos */
char existeProducto(int codigoProducto, Producto *producto); /* Busca si existe el producto en el archivo de productos */
char existeProducto2(char descripcionProducto, Producto *producto);
char insertarProducto(Producto producto); /* Inserta el producto al final del archivo */
char eliminarProducto(int codigoProducto); /* Eliminar el producto de código codigoProducto del archivo */
char eliminacionFisica(); /* Realiza la eliminación física de registros inválidos del archivo de productos */
char modificarProducto(Producto producto); /* Modifica el producto en el archivo */
char guardarReporte(); /* Genera un archivo TXT con el reporte de los productos */
/* Función de lectura de cadenas */
int leecad(char *cad, int n);
/* Titular del programa */
void tituloPrincipal();
char linea[MAX];
int main()
{
setlocale(LC_ALL, "spanish"); /* Permite imprimir caracteres con tilde */
menuPrincipal();
return 0;
}
void menuPrincipal()
{
char repite = 1;
int opcion = -1;
/* Cuando el usuario ingresa texto en lugar de ingresar una opción. El programa no modifica
el valor de opcion. En ese caso, no se debe de ingresar a ninguno de los case, por eso se está
inicializando la variable opcion con un valor que no permita ejecutar ningún case. Simplemente,
volver a interar y pedir nuevamente la opción. */
do {
system( "COLOR 2" );//con esto sólo cambiamos el color de nuestra fuente
system("cls");
tituloPrincipal();
printf("\n\t\t\t\t\t\tMENÚ PRINCIPAL\n");
printf("\n\t\t[1] Insertar nuevo producto\n");
printf("\t\t[2] Eliminar un producto\n");
printf("\t\t[3] Modificar un producto\n");
printf("\t\t[4] Lista ligada de productos con menor stock\n");
printf("\t\t[5] Muestra: \n");
printf("\t\t[6] Mostrar listado de productos (generar reporte)\n");
printf("\t\t[7] Salir\n");
printf("\n\t\tQué deseas hacer?: [ ]\b\b");
/* Lectura segura de un entero */
leecad(linea, MAX);
sscanf(linea, "%d", &opcion);
switch (opcion) {
case 1:
menuInsertar();
break;
case 2:
menuEliminar();
break;
case 3:
menuModificar();
break;
case 4:
menuStockMinimo();
break;
case 5:
menuMuestras();
break;
case 6:
menuMostrar();
break;
case 7:
repite = 0;
break;
}
} while (repite);
}
void menuMuestras()
{
char repite = 1;
int opcion = -1;
do {
system("cls");
tituloPrincipal();
printf("\n\t\t\t\t\t\tMENÚ QUE MUESTRA: \n");
printf("\n\t\t[1] Info de un producto (por clave)\n");
printf("\t\t[2] Laboratorio que elabora/distribuye un producto (con descripción)\n");
printf("\t\t[3] Utilidad total del inventario\n");
printf("\t\t[4] Volver al Menú Principal\n");
printf("\n\t\tQué deseas hacer?: [ ]\b\b");
/* Lectura segura de un entero */
leecad(linea, MAX);
sscanf(linea, "%d", &opcion);
switch (opcion) {
case 1:
menuBuscarClave();
break;
case 2:
menuBuscarDescripcion();
break;
case 3:
menuUtilidad();
break;
case 4:
repite = 0;
break;
}
} while (repite);
}
void menuInsertar()
{
Producto producto;
int codigoProducto = 0;
char repite = 1;
char respuesta[MAX];
do {
system("cls");
tituloPrincipal();
printf("\n\n\t\t\t SISTEMA DE INGRESO DE PRODUCTOS \n");
/* Se pide el código del producto a insertar */
printf("\n\tCódigo de producto: ");
leecad(linea, MAX);
sscanf(linea, "%d", &codigoProducto);
/* Se verifica que el producto no haya sido almacenado anteriormente */
if (!existeProducto(codigoProducto, &producto)) {
producto.codigo = codigoProducto;
/* Se piden los demás datos del producto a insertar */
printf("\tNombre del producto: ");
leecad(producto.nombre, MAX);
printf("\tDescripción del producto: ");
leecad(producto.descripcion, MAX);
printf("\tLaboratorio: ");
leecad(producto.laboratorio, MAX);
printf("\tCosto de compra ($): ");
leecad(linea, MAX);
sscanf(linea, "%f", &producto.costo);
printf("\tCosto de venta ($): ");
leecad(linea, MAX);
sscanf(linea, "%f", &producto.precio);
printf("\tCantidad: ");
leecad(linea, MAX);
sscanf(linea, "%d", &producto.cantidad);
/* Se inserta el producto en el archivo */
if (insertarProducto(producto)) {
printf("\n\tEl producto fue insertado correctamente\n");
} else {
printf("\n\tOcurrió un error al intentar insertar el producto\n");
printf("\tInténtelo mas tarde\n");
}
} else {
/* El producto ya existe, no puede ser insertado. */
printf("\n\tEl producto de código %d ya existe.\n", codigoProducto);
printf("\tNo puede ingresar dos productos distintos con el mismo código.\n");
}
printf("\n\tDesea seguir ingresando productos? [S/N]: ");
leecad(respuesta, MAX);
if (!(strcmp(respuesta, "S") == 0 || strcmp(respuesta, "s") == 0)) {
repite = 0;
}
} while (repite);
}
void menuBuscarClave()
{
Producto producto;
int codigoProducto;
char repite = 1;
char respuesta[MAX];
do {
system("cls");
tituloPrincipal();
printf("\n\t\t\t==> BUSCAR PRODUCTO POR CÓDIGO <==\n");
/* Se pide el código del producto a buscar */
printf("\n\tCódigo de producto: ");
leecad(linea, MAX);
sscanf(linea, "%d", &codigoProducto);
/* Se verifica que el producto a buscar, exista */
if (existeProducto(codigoProducto, &producto)) {
/* Se muestran los datos del producto */
printf("\n\tCódigo del producto: %d\n", producto.codigo);
printf("\tNombre del producto: %s\n", producto.nombre);
printf("\tCosto del producto: %.1f $\n", producto.costo);
printf("\tPrecio del producto: %.1f $\n", producto.precio);
printf("\tCantidad: %d\n", producto.cantidad);
} else {
/* El producto no existe */
printf("\n\tEl producto de código %d no existe.\n", codigoProducto);
}
printf("\n\tDesea seguir buscando algún producto? [S/N]: ");
leecad(respuesta, MAX);
if (!(strcmp(respuesta, "S") == 0 || strcmp(respuesta, "s") == 0)) {
repite = 0;
}
} while (repite);
}
void menuBuscarDescripcion()
{
Producto producto;
char descripcionProducto;
char repite = 1;
char respuesta[MAX];
do {
system("cls");
tituloPrincipal();
printf("\n\t\t\t BUSCAR PRODUCTO POR DESCRIPCIÓN \n");
/* Se pide la descripción del producto a buscar */
printf("\tDescripción del producto: ");
leecad(producto.descripcion, MAX);
/* Se verifica que el producto a buscar, exista */
if (existeProducto2(descripcionProducto, &producto)) {
// Se muestran los datos del producto
printf("\n\tLaboratorio que elabora/distribuye el producto: %s\n", producto.laboratorio);
} else {
// El producto no existe
printf("\n\tEl producto de descripción %s no existe.\n", producto.descripcion);
}
printf("\n\tDesea seguir buscando algún producto? [S/N]: ");
leecad(respuesta, MAX);
if (!(strcmp(respuesta, "S") == 0 || strcmp(respuesta, "s") == 0)) {
repite = 0;
}
} while (repite);
}
void menuUtilidad()
{
Producto *productos;
int numeroProductos;
int i;
float costoTotal;
float precioTotal;
float utilidadTotal;
int cantidadTotal;
char respuesta[MAX];
system("cls");
tituloPrincipal();
productos = obtenerProductos(&numeroProductos); /* Retorna un vector dinámico de productos */
if (numeroProductos == 0) {
printf("\n\tEl archivo está vacío!!\n");
system("pause>nul");
} else {
printf("\n\n\t\t PRODUCTOS INGRESADOS EN INVENTARIO \n");
printf(" -------------------------------------------------------------------------------------------------------------\n");
printf("%8s\t%-12s%15s%15s%15s%15s%10s\n", "CÓDIGO", "NOMBRE", "DESCRIPCIÓN", "LABORATORIO", "COSTO C. $", "COSTO V. $", "UNIDADES");
printf(" -------------------------------------------------------------------------------------------------------------\n");
/* Se recorre el vector dinámico de productos */
costoTotal = 0;
precioTotal = 0;
cantidadTotal = 0;
for (i = 0; i < numeroProductos; i++) {
if (productos[i].codigo != VALOR_CENTINELA) {
printf("%7d \t%-15s %-15s %-8s%15.1f%15.1f%8d\n", productos[i].codigo, productos[i].nombre, productos[i].descripcion, productos[i].laboratorio, productos[i].costo, productos[i].precio, productos[i].cantidad);
costoTotal += productos[i].costo;
precioTotal += productos[i].precio;
cantidadTotal += productos[i].cantidad;
}
}
printf(" -------------------------------------------------------------------------------------------------------------\n");
printf("\t\t\t TOTAL: %15.1f%15.1f%8d\n", costoTotal, precioTotal, cantidadTotal);
utilidadTotal = (precioTotal - costoTotal)*cantidadTotal;
printf("\n>>> Utilidad Total de Inventario: $ %.2f \n\n",utilidadTotal);
system("pause>nul");
}
}
void menuEliminar()
{
Producto producto;
int codigoProducto;
char repite = 1;
char respuesta[MAX];
do {
system("cls");
tituloPrincipal();
printf("\n\t\t\t ELIMINAR UN PRODUCTO POR CÓDIGO \n");
/* Se pide el código del producto a eliminar */
printf("\n\tCódigo de producto: ");
leecad(linea, MAX);
sscanf(linea, "%d", &codigoProducto);
/* Se verifica que el producto a buscar, exista */
if (existeProducto(codigoProducto, &producto)) {
/* Se muestran los datos del producto */
printf("\n\tCódigo del producto: %d\n", producto.codigo);
printf("\tNombre del producto: %s\n", producto.nombre);
printf("\tCosto del producto: %.1f $\n", producto.costo);
printf("\tPrecio del producto: %.1f $\n", producto.precio);
printf("\tCantidad: %d\n", producto.cantidad);
printf("\n\tSeguro que desea eliminar el producto? [S/N]: ");
leecad(respuesta, MAX);
if (strcmp(respuesta, "S") == 0 || strcmp(respuesta, "s") == 0) {
if (eliminarProducto(codigoProducto)) {
printf("\n\tProducto eliminado satisfactoriamente.\n");
} else {
printf("\n\tEl producto no pudo ser eliminado\n");
}
}
} else {
/* El producto no existe */
printf("\n\tEl producto de código %d no existe.\n", codigoProducto);
}
printf("\n\tDesea eliminar otro producto? [S/N]: ");
leecad(respuesta, MAX);
if (!(strcmp(respuesta, "S") == 0 || strcmp(respuesta, "s") == 0)) {
repite = 0;
}
} while (repite);
}
void menuMostrar()
{
Producto *productos;
int numeroProductos;
int i;
float costoTotal;
float precioTotal;
int cantidadTotal;
char respuesta[MAX];
system("cls");
tituloPrincipal();
productos = obtenerProductos(&numeroProductos); /* Retorna un vector dinámico de productos */
if (numeroProductos == 0) {
printf("\n\tEl archivo está vacío!!\n");
system("pause>nul");
} else {
printf("\n\n\t\t PRODUCTOS INGRESADOS EN INVENTARIO \n");
printf(" -------------------------------------------------------------------------------------------------------------\n");
printf("%8s\t%-12s%15s%15s%15s%15s%10s\n", "CÓDIGO", "NOMBRE", "DESCRIPCIÓN", "LABORATORIO", "COSTO C. $", "COSTO V. $", "UNIDADES");
printf(" -------------------------------------------------------------------------------------------------------------\n");
/* Se recorre el vector dinámico de productos */
costoTotal = 0;
precioTotal = 0;
cantidadTotal = 0;
for (i = 0; i < numeroProductos; i++) {
if (productos[i].codigo != VALOR_CENTINELA) {
printf("%7d \t%-15s %-15s %-8s%15.1f%15.1f%8d\n", productos[i].codigo, productos[i].nombre, productos[i].descripcion, productos[i].laboratorio, productos[i].costo, productos[i].precio, productos[i].cantidad);
costoTotal += productos[i].costo;
precioTotal += productos[i].precio;
cantidadTotal += productos[i].cantidad;
}
}
printf(" -------------------------------------------------------------------------------------------------------------\n");
printf("\t\t\t TOTAL: %15.1f%15.1f%8d\n", costoTotal, precioTotal, cantidadTotal);
printf("\n\tDesea guardar el reporte en un archivo de texto? [S/N]: ");
leecad(respuesta, MAX);
if (strcmp(respuesta, "S") == 0 || strcmp(respuesta, "s") == 0) {
if (guardarReporte()) {
printf("\n\tEl reporte fue guardado con éxito\n");
} else {
printf("\n\tOcurrió un error al guardar el reporte\n");
}
system("pause>nul");
}
}
}
void menuModificar()
{
Producto producto;
int codigoProducto;
char repite = 1;
char respuesta[MAX];
do {
system("cls");
tituloPrincipal();
printf("\n\t\t\t\t\t MODIFICAR UN PRODUCTO \n");
/* Se pide el código del producto a modificar */
printf("\n\tCódigo de producto: ");
leecad(linea, MAX);
sscanf(linea, "%d", &codigoProducto);
/* Se verifica que el producto a buscar exista */
if (existeProducto(codigoProducto, &producto)) {
/* Se muestran los datos del producto */
printf("\n\tNombre del producto: %s\n", producto.nombre);
printf("\tDescripción: %s\n", producto.descripcion);
printf("\tLaboratorio: %s\n", producto.laboratorio);
printf("\tCosto de compra del producto ($): %.1f\n", producto.costo);
printf("\tCosto de venta del producto ($): %.1f\n", producto.precio);
printf("\tCantidad: %d\n", producto.cantidad);
printf("\n\tElija los datos a modificar\n");
/* Modificación del nombre del producto */
printf("\n\tNombre del producto actual: %s\n", producto.nombre);
/* Modificación del costo del producto */
printf("\n\tCosto de compra del producto actual: %.1f\n", producto.costo);
printf("\tDesea modificar el costo de compra del producto? [S/N]: ");
leecad(respuesta, MAX);
if (strcmp(respuesta, "S") == 0 || strcmp(respuesta, "s") == 0) {
printf("\tNuevo costo de compra del producto: ");
leecad(linea, MAX);
sscanf(linea, "%f", &producto.costo);
}
/* Modificación del precio del producto */
printf("\n\tCosto de venta del producto actual: %.1f\n", producto.precio);
printf("\tDesea modificar el costo de venta del producto? [S/N]: ");
leecad(respuesta, MAX);
if (strcmp(respuesta, "S") == 0 || strcmp(respuesta, "s") == 0) {
printf("\tNuevo costo de venta del producto: ");
leecad(linea, MAX);
sscanf(linea, "%f", &producto.precio);
}
/* Modificación de la cantidad del producto */
printf("\n\tCantidad del producto actual: %d\n", producto.cantidad);
printf("\tDesea modificar las existencias del producto? [S/N]: ");
leecad(respuesta, MAX);
if (strcmp(respuesta, "S") == 0 || strcmp(respuesta, "s") == 0) {
printf("\tNueva cantidad del producto: ");
leecad(linea, MAX);
sscanf(linea, "%d", &producto.cantidad);
}
printf("\n\tEstá seguro que desea modificar los datos del producto? [S/N]: ");
leecad(respuesta, MAX);
if (strcmp(respuesta, "S") == 0 || strcmp(respuesta, "s") == 0) {
/* Se modifica el producto en el archivo */
if (modificarProducto(producto)) {
printf("\n\tEl producto fue modificado correctamente\n");
} else {
printf("\n\tOcurrió un error al intentar modificar el producto\n");
printf("\tInténtelo mas tarde\n");
}
}
} else {
/* El producto no existe */
printf("\n\tEl producto de código %d no existe.\n", codigoProducto);
}
printf("\n\tDesea modificar algún otro producto? [S/N]: ");
leecad(respuesta, MAX);
if (!(strcmp(respuesta, "S") == 0 || strcmp(respuesta, "s") == 0)) {
repite = 0;
}
} while (repite);
}
void menuEliminarFisica()
{
char respuesta[MAX];
system("cls");
tituloPrincipal();
printf("\n\t\t==> ELIMINAR FÍSICAMENTE REGISTROS DEL ARCHIVO <==\n");
/* Se pide el código del producto a eliminar */
printf("\n\tSeguro que desea proceder con la eliminación física? [S/N]: ");
leecad(respuesta, MAX);
if (strcmp(respuesta, "S") == 0 || strcmp(respuesta, "s") == 0) {
if (eliminacionFisica()) {
printf("\n\tLa eliminación física se realizó con éxito.\n");
} else {
printf("\n\tOcurrió algún error en la eliminación física.\n");
}
system("pause>nul");
}
}
void menuStockMinimo()
{
Producto *productos;
int numeroProductos;
int i;
int aux=0;
int minimo=3;
char respuesta[MAX];
system("cls");
tituloPrincipal();
productos = obtenerProductos(&numeroProductos); /* Retorna un vector dinámico de productos */
if (numeroProductos == 0) {
printf("\n\tEl archivo está vacío!!\n");
system("pause>nul");
}
for (i = 0; i < numeroProductos; i++){
if (productos[i].cantidad <= minimo) {
printf("\nEl producto:\n\n");
printf("%8s\t%-12s%15s%15s%15s%15s\n", "CÓDIGO", "NOMBRE", "DESCRIPCIÓN", "LABORATORIO", "COSTO C. $", "COSTO V. $");
printf("%7d \t%-15s %-15s %-8s%15.1f%15.1f\n", productos[i].codigo, productos[i].nombre, productos[i].descripcion, productos[i].laboratorio, productos[i].costo, productos[i].precio);
printf("\nSe encuentra en niveles por debajo del mínimo permitido de existencias, deberías considerar adquirir más unidades\n");
}
aux++;
if(aux>4){
printf("\n\tYa he revisado tus existencias y no hay nada por debajo del mínimo\n");
}else{
printf("\n\t \n");
}
}
system("pause>nul");
}
Producto *obtenerProductos(int *n)
{
FILE *archivo;
Producto producto;
Producto *productos; /* Vector dinámico de productos */
int i;
/* Abre el archivo en modo lectura */
archivo = fopen("productos.dat", "rb");
if (archivo == NULL) { /* Si no se pudo abrir el archivo, el valor de archivo es NULL */
*n = 0; /* No se pudo abrir. Se considera n */
productos = NULL;
} else {
fseek(archivo, 0, SEEK_END); /* Posiciona el cursor al final del archivo */
*n = ftell(archivo) / sizeof(Producto); /* # de productos almacenados en el archivo. (# de registros) */
productos = (Producto *)malloc((*n) * sizeof(Producto)); /* Se reserva memoria para todos los productos almacenados en el archivo */
/* Se recorre el archivo secuencialmente */
fseek(archivo, 0, SEEK_SET); /* Posiciona el cursor al principio del archivo */
fread(&producto, sizeof(producto), 1, archivo);
i = 0;
while (!feof(archivo)) {
productos[i++] = producto;
fread(&producto, sizeof(producto), 1, archivo);
}
/* Cierra el archivo */
fclose(archivo);
}
return productos;
}
char existeProducto(int codigoProducto, Producto *producto)
{
FILE *archivo;
char existe;
/* Abre el archivo en modo lectura */
archivo = fopen("productos.dat", "rb");
if (archivo == NULL) { /* Si no se pudo abrir el archivo, el valor de archivo es NULL */
existe = 0;
} else {
existe = 0;
/* Se busca el producto cuyo código coincida con codigoProducto */
fread(&(*producto), sizeof(*producto), 1, archivo);
while (!feof(archivo)) {
if ((*producto).codigo == codigoProducto) {
existe = 1;
break;
}
fread(&(*producto), sizeof(*producto), 1, archivo);
}
/* Cierra el archivo */
fclose(archivo);
}
return existe;
}
char existeProducto2(char descripcionProducto, Producto *producto)//
{
FILE *archivo;
char existe;
/* Abre el archivo en modo lectura */
archivo = fopen("productos.dat", "rb");
if (archivo == NULL) { /* Si no se pudo abrir el archivo, el valor de archivo es NULL */
existe = 0;
} else {
existe = 0;
/* Se busca el producto cuyo código coincida con codigoProducto */
fread(&(*producto), sizeof(*producto), 1, archivo);
while (!feof(archivo)) {
if ((*producto).descripcion == descripcionProducto) {
existe = 1;
break;
}
fread(&(*producto), sizeof(*producto), 1, archivo);
}
/* Cierra el archivo */
fclose(archivo);
}
return existe;
}
char insertarProducto(Producto producto)
{
FILE *archivo;
char insercion;
/* Abre el archivo para agregar datos al final */
archivo = fopen("productos.dat", "ab"); /* Añade datos al final. Si el archivo no existe, es creado */
if (archivo == NULL) { /* Si no se pudo abrir el archivo, el valor de archivo es NULL */
insercion = 0;
} else {
fwrite(&producto, sizeof(producto), 1, archivo);
insercion = 1;
/* Cierra el archivo */
fclose(archivo);
}
return insercion;
}
/* ELiminación lógica de un registro */
char eliminarProducto(int codigoProducto)
{
FILE *archivo;
FILE *auxiliar;
Producto producto;
char elimina;
/* Abre el archivo para leer */
archivo = fopen("productos.dat", "r+b"); /* Modo lectura/escritura. Si el archivo no existe, es creado */
if (archivo == NULL) { /* Si no se pudo abrir el archivo, el valor de archivo es NULL */
elimina = 0;
} else {
/* Se busca el registro que se quiere borrar. Cuando se encuentra, se sitúa en esa posición mediante la
función fseek y luego se modifica el campo clave de ese registro mediante algún valor centinela, eso se logra
con fwrite. Hasta allí se ha logrado una eliminación LÓGICA. Porque el registro sigue ocupando espacio en el archivo físico */
elimina = 0;
fread(&producto, sizeof(producto), 1, archivo);
while (!feof(archivo)) {
if (producto.codigo == codigoProducto) {
fseek(archivo, ftell(archivo) - sizeof(producto), SEEK_SET);
producto.codigo = VALOR_CENTINELA;
fwrite(&producto, sizeof(producto), 1, archivo);
elimina = 1;
break;
}
fread(&producto, sizeof(producto), 1, archivo);
}
/* Cierra el archivo */
fclose(archivo);
}
return elimina;
}
char eliminacionFisica()
{
FILE *archivo;
FILE *temporal;
Producto producto;
char elimina = 0;
archivo = fopen("productos.dat", "rb");
temporal = fopen("temporal.dat", "wb");
if (archivo == NULL || temporal == NULL) {
elimina = 0;
} else {
/* Se copia en el archivo temporal los registros válidos */
fread(&producto, sizeof(producto), 1, archivo);
while (!feof(archivo)) {
if (producto.codigo != VALOR_CENTINELA) {
fwrite(&producto, sizeof(producto), 1, temporal);
}
fread(&producto, sizeof(producto), 1, archivo);
}
/* Se cierran los archivos antes de borrar y renombrar */
fclose(archivo);
fclose(temporal);
remove("productos.dat");
rename("temporal.dat", "productos.dat");
elimina = 1;
}
return elimina;
}
char modificarProducto(Producto producto)
{
FILE *archivo;
char modifica;
Producto producto2;
/* Abre el archivo para lectura/escritura */
archivo = fopen("productos.dat", "rb+");
if (archivo == NULL) { /* Si no se pudo abrir el archivo, el valor de archivo es NULL */
modifica = 0;
} else {
modifica = 0;
fread(&producto2, sizeof(producto2), 1, archivo);
while (!feof(archivo)) {
if (producto2.codigo == producto.codigo) {
fseek(archivo, ftell(archivo) - sizeof(producto), SEEK_SET);
fwrite(&producto, sizeof(producto), 1, archivo);
modifica = 1;
break;
}
fread(&producto2, sizeof(producto2), 1, archivo);
}
fclose(archivo);
}
/* Cierra el archivo */
return modifica;
}
char guardarReporte()
{
FILE *archivo;
char guardado;
Producto *productos;
int numeroProductos;
int i;
float costoTotal;
float precioTotal;
int cantidadTotal;
productos = obtenerProductos(&numeroProductos); /* Retorna un vector dinámico de productos */
if (numeroProductos == 0) {
guardado = 0;
} else {
/* Abre el archivo en modo texto para escritura */
archivo = fopen("reporte.txt", "w");
if (archivo == NULL) { /* Si no se pudo abrir el archivo, el valor de archivo es NULL */
guardado = 0;
} else {
fprintf(archivo, "\n\t\t ==> LISTADO DE PRODUCTOS REGISTRADOS <==\n");
fprintf(archivo, " ------------------------------------------------------------------------------\n");
fprintf(archivo, "%8s\t%-20s%15s%15s%10s\n", "CODIGO", "NOMBRE", "COSTO $", "PRECIO $", "CANTIDAD");
fprintf(archivo, " ------------------------------------------------------------------------------\n");
/* Se recorre el vector dinámico de productos */
costoTotal = 0;
precioTotal = 0;
cantidadTotal = 0;
for (i = 0; i < numeroProductos; i++) {
if (productos[i].codigo != VALOR_CENTINELA) {
fprintf(archivo, "%7d \t%-20.20s%15.1f%15.1f%8d\n", productos[i].codigo, productos[i].nombre, productos[i].costo, productos[i].precio, productos[i].cantidad);
costoTotal += productos[i].costo;
precioTotal += productos[i].precio;
cantidadTotal += productos[i].cantidad;
}
}
fprintf(archivo, " ------------------------------------------------------------------------------\n");
fprintf(archivo, "\t\t\t TOTAL: %15.1f%15.1f%8d", costoTotal, precioTotal, cantidadTotal);
guardado = 1;
/* Cierra el archivo */
fclose(archivo);
}
}
return guardado;
}
int leecad(char *cad, int n)
{
int i, c;
/* Hay que verificar si el buffer está limpio o si hay un '\n'
dejado por scanf y, en ese caso, limpiarlo:
*/
/* 1 COMPROBACIÓN DE DATOS INICIALES EN EL BUFFER */
/* Empezamos leyendo el primer caracter que haya en la entrada. Si es
EOF, significa que no hay nada por leer, así que cerramos la cadena,
dejándola "vacía" y salimos de la función retornando un valor de 0
o falso, para indicar que hubo un error */
c = getchar();
if (c == EOF) {
cad[0] = '\0';
return 0;
}
/* Si el valor leído es '\n', significa que había un caracter de nueva línea
dejado por un scanf o función similar. Simplemente inicializamos i a 0,
para indicar que los siguientes caracteres que leamos iremos asignando a
partir del primer caracter de la cadena. */
if (c == '\n') {
i = 0;
} else {
/* Si no había un '\n', significa que el caracter que leímos es el primer
caracter de la cadena introducida. En este caso, lo guardamos en la
posición 0 de cad, e inicializamos i a 1, porque en este caso, como ya
tenemos el primer caracter de la cadena, continuaremos agregando
caracteres a partir del segundo.
*/
cad[0] = c;
i = 1;
}
/* 2. LECTURA DE LA CADENA */
/* El for empieza con un ; porque estamos omitiendo la inicialización del contador,
ya que fue inicializado en el punto anterior.
Este código lee un caracter a la vez,lo agrega a cad, y se repite hasta que
se encuentre un fin de línea, fin de archivo, o haya leído la cantidad máxima
de caracteres que se le indicó. Luego, cierra la cadena agregando un '\0'
al final. Todo esto es muy similar a la forma en que los compiladores suelen
implementar la función fgets, sólo que en lugar de getchar usan getc o fgetc
*/
for (; i < n - 1 && (c = getchar()) != EOF && c != '\n'; i++) {
cad[i] = c;
}
cad[i] = '\0';
/*3. LIMPIEZA DEL BUFFER */
/* Finalmente limpiamos el buffer si es necesario */
if (c != '\n' && c != EOF) /* es un caracter */
while ((c = getchar()) != '\n' && c != EOF);
/* La variable c contiene el último caracter leído. Recordemos que había 3 formas
de salir del for: que hayamos encontrando un '\n', un EOF, o que hayamos llegado
al máximo de caracteres que debemos leer. Si se da cualquiera de los dos
primeros casos, significa que leímos todo lo que había en el buffer, por lo que
no hay nada que limpiar. En el tercer caso, el usuario escribió más caracteres
de los debidos, que aún están en el buffer, por lo que hay que quitarlos, para
lo cual usamos el método que vimos poco más arriba
*/
return 1;
}
void tituloPrincipal()
{
int i;
printf("\n \n");//
printf("\t\t\t FARMACIAS DEL NORTE S.A de C.V\n");
printf("\t\t\t Tú salud nuestro premio!\n");
i = 0;
putchar('\n');
for (; i < 110; i++) {
putchar('*');
}
}
from math import pi, tan, cos, sin
from math import radians
import numpy as np
from matplotlib.pylab import *
import matplotlib.pyplot as plt
from math import *
from sympy import *
from sympy.plotting import *
from time import *
from scipy import *
while True:
try:
vi = float(input("Introduzca la velocidad inicial en (m/s) : "))
break
except ValueError:
print("Cantidad Incorrecta")
print("m/s =",vi)
while True:
try:
angulo = int(input("Introduzca el ángulo en grados: "))
break
except ValueError:
print("\nCantidad Incorrecta\n")
print(angulo,"°")#no es necesario, lo uso para que vayamos viendo el resultado
while True:
try:
g = float(input("Introduzca el valor de gravedad en m/s^2: "))
break
except ValueError:
print("\nCantidad Incorrecta\n")
print("\ng =",g)
grados = ((angulo*pi)/180)
print ("\ngrados =",grados)
while True:
try:
xo = float(input("Posición horizontal inicial [x0]: "))
break
except ValueError:
print("\nCantidad Incorrecta\n")
while True:
try:
yo = float(input("Posición vertical inicial [y0]: "))
break
except ValueError:
print("\nCantidad Incorrecta\n")
a = tan(grados)
b = ((g)/((2*vi*2)*cos(grados)*2))
print()
ymax=(vi**2)*(np.sin(grados)*sin(grados))/(2*g)
xmax=(vi**2)*(np.sin(2*grados))/(g)
vho = vi*(cos(radians(angulo)))
vver = vi*(sin(radians(angulo)))
print("Un proyectil lanzado con una velocidad inicial de Vo=",vi,"m/s y un ángulo de α=",angulo,"°,")
print("iniciará su trayectoria con una velocidad horizontal de vxO: ",format(vho,".3f"),"m/s,")
print("y una velocidad vertical de vyO: ",format(vver,".3f"),"m/s.")
print()
print("Los parámetros más relevantes de su trayectoria son:")
tmax=(vi*sin(grados))/(g)
tv=2*(tmax)
print()
print(str("La altura máxima alcanzada por el proyectil es: Ymax")+" = "+str(ymax)+" m")
print()
print(str("El alcance máximo horizontal del proyectil es: Xmax")+" = "+str(xmax)+" m")
print()
print("La altura máxima (m) alcanzada por el proyectil es: Ymax =",format(ymax,".2f"))
print()
print("El alcance máximo horizontal(m) del proyectil es: Xmax =",format(xmax," .2f"))
print()
print("El tiempo máximo t1max (s) que alcanza el proyectil para el ángulo β es: t1max =",format(tmax,".2f"))
print()
print("El tiempo de vuelo t1v(s) que alcanza el proyectil para el angulo β es: t1v =",format(tv,".2f"))
print("----------------------------------------------------------------------")
print("----------------------------------------------------------------------")
# Definimos la ecuación de la trayectoria
def f(x):
return(a*x-b*x**2)
x=np.linspace(0,xmax,500)
# añadimos el subtitulo
plt.suptitle("CINEMATICA",fontsize=20,color="red")
#añadimos las etiquetas de los ejes
xlabel("xmax",fontsize=20,color="red")
ylabel("ymax",fontsize=20,color="blue")
#añadimos texto
plt.text(((np.argmax(f(x)))/2),np.max(f(x))+1,"vi=",fontsize=10)
plt.text(((np.argmax(f(x)))/2)+11,np.max(f(x))+1,(str(vi)+"m/s"),fontsize=10)
# Añadimos la rejilla en la gráfica
plt.grid(True)
plt.grid(color = '0.5', linestyle = '--', linewidth = 1)
# Añadimos los ejes
# plt.axis("tight")
# dibujamos y ponemos etiquetas a la gráfica
plt.text(3,1,angulo,fontsize=10)
plt.plot(x, f(x), "red", linewidth = 2, label = (str(angulo)+"º"))
#include <stdio.h>
#include <stdlib.h>
int main()
{
int mat[50][50];
int n, i, j, esIdentidad = 1;
printf("Tamanio: ");
scanf("%d", &n);
for(i = 0; i < n; i++)
for(j = 0; j < n; j++)
{
printf( "Matriz[%d][%d]: ", i, j );
scanf( "%d", &mat[i][j] );
if( (mat[i][j] != 0 && i != j) ||
(mat[i][j] != 1 && i == j))
esIdentidad = 0;
}
for(i = 0; i < n; i++)
{
for(j = 0; j < n; j++)
printf("%d ", mat[i][j]);
printf("\n");
}
if(esIdentidad)
printf( "Es matriz identidad.\n");
else
printf( "No es matriz identidad.\n");
system("pause");
return 0;
}