1. to array jest potrzebne do zapisywania liczb w jakiejś macierzy, czy można go używać jeszcze w innych przypadkach?
2. po co ta zmienna t?
3. Co to jest '-1e12'?
4 I dlaczego sum := 0.0, czyli dlaczego trzeba wyzerować sumę przed obliczeniem?
5. Co oznacza taki zapis: sum := sum+t[i,j]? liczymy sumę sumy i czegoś jeszcze?
Koniecznie muszę wiedzieć, o co w tym wszystkim biega, żeby się potem nie zbłaznić na infie. Proszę o pomoc.
Kod: Zaznacz cały
program macierz3na3;
{ program demonstruje elementarne obliczenia macierzowe }
var
t:array[1..3, 1..3] of real; { macierz 3x3 }
max, sum : real; { tymczasowe maksimum i suma elementów }
i, j : integer; { liczniki wierszy i kolumn }
begin
{ wczytanie zawartości macierzy }
for i := 1 to 3 do
for j := 1 to 3 do
begin
write('Podaj element macierzy x[',i,',',j,']: ');
readln(t[i,j]);
end;
{ wyszukanie maksymalnego elementu }
max := -1e12; { pamiętaj o inicjalizacji maksimum }
for i := 1 to 3 do
for j := 1 to 3 do
if t[i,j] > max then max := t[i,j];
{ obliczenie sumy elementów na i nad przekątną }
sum := 0.0; { pamiętaj o wyzerowaniu sumy przed obliczaniem }
for i := 1 to 3 do
for j := i to 3 do
sum := sum+t[i,j];
writeln('Najwiekszy element: ', max:0:0);
writeln('Suma elementow na i nad przekatna: ', sum:0:2);
readln;
end.