Ayuda con la implementación de programas en pascal para realizar operaciones sobre variables
Sera que me podes resolver estos 3 programas por favor----
1. Ingrese en variables separadas los días de los meses de enero y febrero y que muestre la suma.-
2 ingrese cantidad de camisas y valor por camisa y que muestre el costo total.
3. Ingrese 5 cantidades y que muestre el promedio.
Muchas gracias por tu ayuda es muy importante para mi
saludos,,,
att,
ruben guzman
guatemala
1. Ingrese en variables separadas los días de los meses de enero y febrero y que muestre la suma.-
2 ingrese cantidad de camisas y valor por camisa y que muestre el costo total.
3. Ingrese 5 cantidades y que muestre el promedio.
Muchas gracias por tu ayuda es muy importante para mi
saludos,,,
att,
ruben guzman
guatemala
Respuesta
1
Respecto a los 2 primero programas no termino de entender que es exactamente lo que quieres. Para el primero ¿qué quieres ingresar 31 cantidades para enero y 28 para febrero? O ¿Es una por cada mes?
Respecto al segundo, según lo entiendo yo, no es más que una simple multiplicación. Lees los valores con Readln y calculas el total multiplicanco camisas por precio.
Programa 3:
Uses CRT;
Var
N,I,SUMA : Integer;
media : real;
Begin
SUMA := 0
Clrscr;
Writeln('Introduzca 5 cantidades: ');
fOR i:=1 TO 5 DO
bEGIN
READLN(N);
SUMA:=SUMA+N;
END;
MEDIA := SUMA / 5;
Writeln('El promedio es: ',Media:2:2);
end.
Respecto al segundo, según lo entiendo yo, no es más que una simple multiplicación. Lees los valores con Readln y calculas el total multiplicanco camisas por precio.
Programa 3:
Uses CRT;
Var
N,I,SUMA : Integer;
media : real;
Begin
SUMA := 0
Clrscr;
Writeln('Introduzca 5 cantidades: ');
fOR i:=1 TO 5 DO
bEGIN
READLN(N);
SUMA:=SUMA+N;
END;
MEDIA := SUMA / 5;
Writeln('El promedio es: ',Media:2:2);
end.