// Zadanie 1
// Deklaracja danych
L=0.2;          // [m]
Tw=100;         // [stopnie Celsjusza]
Tz=300;         // [stopnie Celsjusza]
lambda=1;       // [W/mK]
Q=0 ;           // [W/m^3]
// Definicja macierzy koniecznych do wyznaczenia stałych całkowania
A=[0 1; L 1];
B=[Tw; Tz+(Q/2*lambda)*L.^2];
// Sprawdzenie, czy wyznacznik macierzy A jest niezerowy
det(A);         // Jest niezerowy :)
// Obliczenie macierzy odwrotnej i wyznaczenie macierzy stałych całkowania
odwA=1/A;
X=odwA*B;

C1=X(1,:);
C2=X(2,:);

// Zdefiniowanie macierzy jednowierszowej z wyrazami z zakresu od 0 do 0.2, z krokiem 0.01
x=0:0.01:0.2;
// Zdefiniowanie macierzy jednowierszowej z wartościami funkcji dla kolejnych wyrazów macierzy x
T=-(Q/2*lambda)*x.^2+C1*x+C2;

x1=0.15;
// Wyznaczenie temperatury w punkcie 0.15
wart_x=-(Q/2*lambda)*x1^2+C1*x1+C2;
// Narysowanie wykresu dla argumentu x i wartości funkcji T
plot(x,T);
xtitle('Wykres funkcji T(x)', 'Dlugosc plyty [m]', 'Wartosc temperatury [st. C]');