Lenguaje C
Descripción La asociacion de vinicultores tiene como politica fijar un precio inicial al kilo de uva, la cual se clasifica en tipos A y B, y ademas en tamaños 1 y 2. Cuando se realiza la venta del producto, ésta es de un sólo tipo y tamaño. Se requiere determinar cuánto recibirá un productor por la uva que entrega en un embarque, considerando lo siguiente: si es de tipo A, se le cargan $20 al precio inicial cuando es de tamaño 1; y $30 si es de tamaño 2. Si es de tipo B, se rebajan $30 cuando es de tamaño 1, y $50 cuando es de tamaño 2. Determinar la ganancia obtenida.
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
#include <stdio.h>
#include <stdlib.h>

int main (void)
{
    int tipo_de_uva;
    float embarque_en_kilos, ganancia_obtenida, pago_al_productor, precio_inicial, precio_por_kilo;
    float tamano;
    printf ("Ingrese el valor de embarque en kilos: ");
    scanf ("%f", &embarque_en_kilos);
    (void) getchar ();
    printf ("Ingrese el valor de precio inicial: ");
    scanf ("%f", &precio_inicial);
    (void) getchar ();
    printf ("Ingrese el valor de tamano: ");
    scanf ("%f", &tamano);
    (void) getchar ();
    precio_por_kilo=precio_inicial;
    printf ("Seleccione el valor de tipo de uva.\n");
    printf ("\t1.- A\n");
    printf ("\t2.- B\n");
    printf ("\t: ");
    do {
        scanf ("%d", &tipo_de_uva);
        (void) getchar ();
        if (tipo_de_uva<1||tipo_de_uva>2)
            printf ("Valor incorrecto. Ingr\202selo nuevamente.: ");
    } while (tipo_de_uva<1||tipo_de_uva>2);
    if(tipo_de_uva==1&&tamano==1)
        precio_por_kilo=precio_por_kilo+20;
    if(tipo_de_uva==1&&tamano==2)
        precio_por_kilo=precio_por_kilo+30;
    if(tipo_de_uva==2&&tamano==1)
        precio_por_kilo=precio_por_kilo-30;
    if(tipo_de_uva==2&&tamano==2)
        precio_por_kilo=precio_por_kilo-50;
    pago_al_productor=embarque_en_kilos*precio_por_kilo;
    ganancia_obtenida=pago_al_productor-embarque_en_kilos*embarque_en_kilos*precio_por_kilo;
    printf ("Valor de ganancia obtenida: %g\n", ganancia_obtenida);
    printf ("Valor de pago al productor: %g\n", pago_al_productor);
    printf ("Valor de precio por kilo: %g\n", precio_por_kilo);
    putchar ('\n');
    system ("pause");
    return EXIT_SUCCESS;
}