Pseudocódigo/Diagramas de Flujo - ayuda logaritmo

   
Vista:

ayuda logaritmo

Publicado por uriel myking80@gmail.com (1 intervención) el 30/01/2016 20:19:44
Actividad.

Una empresa utiliza la siguiente fórmula para calcular el sueldo de sus empleados:

Sueldo= (100+edad+ (1+2+3+…+años en la compañía))/años en la compañía.

Elabore un programa que permita imprimir el sueldo y el nombre de cada uno de los 40 empleados de la compañía, así como el total acumulado de sueldos y el nombre del empleado que gana más y del que gana menos.

no tengo claridad como hago esto "el nombre del empleado que gana más y del que gana menos."
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

ayuda logaritmo

Publicado por dario (10 intervenciones) el 05/02/2016 15:52:07
Te dejo el algoritmo en pascal.

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
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
uses crt;
const
    max = 40;
type
    empleado=record
        nombre:string;
        edad:byte;
        anios:byte;
        sueldo:real;
    end;
var
    datos:array[1..max] of empleado;
    i,j,s:integer;
    mayor,menor,acumulado:real;
    nombre_mayor,nombre_menor:string;
begin
    clrscr;
    {entrada de datos}
    acumulado:=0;
    for i:=1 to max do begin
        s:=0;
        with datos[i] do begin
            write('Nombre del empleado: ');
            readln(nombre);
            write('Edad del empleado: ');
            readln(edad);
            write('Anios en la empresa: ');
            readln(anios);
            for j:=1 to anios do
                s:=s+j;
            sueldo:=100+edad+s/anios;
            acumulado:=acumulado+sueldo;
        end;
    end;
    writeln;
 
    {Muestra el nombre y el sueldo de los trabajadores}
    for i:=1 to max do begin
        write(datos[i].nombre);
        write(datos[i].sueldo:15:2);
        writeln;
    end;
 
    {Total acumulado de todos los trabajadores}
    writeln;
    writeln('Sueldo total acumulado = ',acumulado:4:2);
 
    {Sueldo mayor y sueldo menor}
    mayor:=0.0;
    for i:=1 to max do begin
        if datos[i].sueldo > mayor then begin
            mayor:=datos[i].sueldo;
            nombre_mayor:=datos[i].nombre;
        end;
    end;
    menor:=datos[1].sueldo;
    for i:=2 to max do begin
        if datos[i].sueldo < menor then begin
            menor:=datos[i].sueldo;
            nombre_menor:=datos[i].nombre;
        end;
    end;
    writeln;writeln('Trabajador con mayor sueldo ',nombre_mayor);
    writeln('Trabajador con menor sueldo ',nombre_menor);
    readkey;
end.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar