Pascal Dopisanie tabeli


(system) #1

pascaltabela.png

Wie ktoś jak dopisać tabele (wymiary 10 na 10)do tego programu?? Wiem, że to pewnie łatwe, ale to mój pierwszy program, w którym robię 2 wymiarową tabele :frowning:

I jeszcze jak dodać, żeby mi obliczało sumę punktów na głównej przekątnej tzn. o współrzędnych ([1,1],[2,2],[3,3]...[10,10])

i wypisywało na samym dole programu.

Z góry dzięki za pomoc


(Kawior1+Dobreprogramy) #2

Na przyszłość podawaj kod a nie zrzut ekranu.

Deklaracja tablicy:

var

t:array[1..10,1..10] of integer

gdzie t to nazwa tablicy a zamiast integer może być podany dowolny typ danych. aby zsumować wystarczy jedna pętla for

for i=1 to 10 do 

suma:=suma+t[i,i];