Pascal/Turbo Pascal - Retornar puntaje

 
Vista:
sin imagen de perfil
Val: 5
Ha disminuido su posición en 3 puestos en Pascal/Turbo Pascal (en relación al último mes)
Gráfica de Pascal/Turbo Pascal

Retornar puntaje

Publicado por Mateo (6 intervenciones) el 02/11/2016 22:13:25
El puntaje de un tablero es la suma de los puntajes de cada celda. A su vez el puntaje de una celda se calcula como sigue:
Celdas rojas, azules y grises tienen puntaje 0.
Una celda blanca con valor (2ᵏ×3) tendrá puntaje 3ᵏ⁺¹

1
2
3
4
5
6
7
8
9
10
11
type
 TipoColor = (roja, azul, blanca, gris);
 TipoCelda = record case color : TipoColor of
				roja,azul,gris  : ();
				blanca : (exponente : integer);
			end;
 RangoIndice = 1..MAXTablero;
 TipoFila = array [RangoIndice] of TipoCelda;
 TipoTablero = array [RangoIndice] of TipoFila;
 
function MostrarPuntaje(tablero: TipoTablero) : integer;
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