%% Program P1_9_1
clear all; close all; clc;
N=500;
n=1:N;
a = -3;
b = 3;
r1=(a)+(b-a).*rand(1,N);
figure(1);
plot(n,r1);
title('Tolydusis skirstinys')
xlabel('Imties numeris n');
ylabel('Amplitude');


%% Program P1_9_2
clear all; close all; clc;
N=500;
n=1:N;
a = 0; % vidurkis
b = 20; % nuokrypis
r=a+ b.*randn(1, N);
plot(n,r);
title('Gauso skirstinys')
xlabel('Imties numeris n');
ylabel('Amplitude');