Pascal/Turbo Pascal - hacer un programa en pascal que visualice un boletin de n estudiantes

   
Vista:

hacer un programa en pascal que visualice un boletin de n estudiantes

Publicado por felix (8 intervenciones) el 19/05/2016 21:02:47
alguien me podria ayudar a resolver este programa ,,



hacer un programa en pascal que visualice un boletin de n estudiantes de septimo año..




me podrian ayudar por favor...????
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

hacer un programa en pascal que visualice un boletin de n estudiantes

Publicado por ramon (2072 intervenciones) el 19/05/2016 22:09:56
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
{Mira esto}
 
 program notas;
   uses
     crt;
   type
     notas_alumno = array[1..3] of real;
 
   var
 
     alumno : array[1..20] of notas_alumno;
     i, cont, k : integer;
 
   procedure entrada_notas;
   begin
      write('   entre numero alumnos 20 max : ');
      readln(cont);
      if cont > 20 then
      cont := 20;
      for k := 1 to cont do
      begin
         for i := 1 to 3 do
         begin
         write('  Entre Notas alumno ',k,' nota n. ',i,' : ');
         readln(alumno[k][i]);
         end;
         writeln;
         write(' Resultado = ',alumno[k][1] + alumno[k][2] + alumno[k][3] /
                                                                100:0:2);
         writeln;
      end;
   end;
 
 
 
 
 
   begin
      entrada_notas;
      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