E dov'è il problema? Puoi usare nu array di interi che costituisce una matrice 5 x 4:
codice:
TYPE Tabella = ARRAY[0..4, 0..3] Of Integer;
...
VAR miaTabella : Tabella;
Poi vai a riempire ciascuna casella della matrice con il valore giusto, sapendo che la prima colonna è quella che indica la sezione, la seconda indica il candidato1, la terza il candidato2 e la quarta il candidato3.

Poi ti scrivi un algoritmo per determinare il candidato con il maggior numero di voti... immagino che sia sufficiente fare la somma per colonne di ciascuna colonna dalla 2 alla 4 e verificare quale delle 3 somme sia la maggiore.

Infine visualizzi il risultato.

Ciao.