function [y]=zad1 (a)

a=input('prosze podac a: ');

y=sin(a)

plot(y)

end

function [y]=zad2 (a)

a=input('podaj a:');

x=-a:a;

y=x+(a^2)

plot(y)

end

function [y]=zad3(a)

a=input('Podaj a:');

c=2*a*a;

x=-2*a:2*a;

y=(x.*x)+(a*a)-c;

plot(y)%wyświetlenie funkcji y

grid on % wyświetlenie siatki

xlabel('os x')%podpisanie osi x

ylabel('os y')%podpisanie osi y

%zad 4

%root - funkcja służąca do obliczania pierwiastków wielomianów

%działanie --> roots[wielomian] np W=10x^5+20x^4+10x^3-2x^2-30X+2

%wielomian w postaci W=[10 20 10 -2 -30 2] -> można wykonywać tu działania

%np W=[10*a 20-2 10^2 -2=17 -30 2]

%rozwiazania wielomianu roots(W)

W=[10 20 10 -2 -30 2]

%zadanie 4

%napisz funkcję obliczjącą pierwiastki wielomianu oraz czytającą parametr z

%klawiatury a

%funkcja y=30ax^4+2ax^4-3ax^3+2ax^2+ax+10;

function [y]=zad4 (a)

a=input ('Wprowadz a: ')

y=[30*a 2*a -3*a 2*a 1*a 10]

roots (y)

end

%zad 7

%Napisz funkcję rownanie kwadratowe, które oblicza deltę wprowadzając a,b,c z klawiatury

function [delta,x1,x2]=delta (a,b,c)

a-input('Natychmiast podaj liczbę a: ')

b=input('Dawaj teraz b: ')

c=input('no i jeszcze tylko c: ')

delta=b^2-4*a*c;

if delta<0

disp('Brak pioerwiastków')

else

x1=(-b-sqrt(delta)/2a;

x2=(-b+sqrt(delta)/2a;

disp('x1= ')

disp(x1)

disp('x2= ')

disp(x2)

end

function[x]=zad10(y1,y2)

[id,kom]=fopen('D:\zielinski.radek.npr\zad10out.m','wt');

fprintf(id,'%s\n','kat x[stopnie] sin(x) cos(x)');

x=30

y1=sin(x);

y2=cos(x);

fprintf(id,'%3d',x);

fprintf(id,'%15.4f%12.4f\n',y1,y2);

fclose(id);

end

%zad11

%Napisz funkcje zad8 wykonującą następujące działanie

%czytaj dane z klawiatury a, podstawienie b=3a, c=5a, d =25a

%obliczające wartości z=((a+10)*(b+30)*(c+10))/d

%załozenie pliku tymczasowego na wyniki zad11out.m

%wprowadznie do załozonego pliku wartość z za pomoca fprintf

function[z]=zad11(a)

a=input('Wpisz wartosc a ')

b=3*a;

c=5*a;

d=25*a;

z=((a+10)*(b+30)*(c+10))/d;

[id,kom]=fopen('D:\zielinski.radek.npr\zad11out.m','wt');

fprintf(id,'%s\n','wartosc z');

fprintf(id,'%15.4f\n',z);

fclose(id);

end

%zad12

%Napisz funkcje zad8 wykonującą następujące działanie

%czytaj dane z klawiatury a, podstawienie b=3a, c=a3,

%do równania ax^2+bx+c=0

%załozenie pliku tymczasowego na wyniki zad12out.m

%wprowadznie do załozonego pliku wartość z za pomoca fprintf, z podziałęm

%na częśc urojoną i rzeczywistą

function[Wynik]=zad12(a)

a=input('Dawaj a ')

b=3*a;

c=a*3;

W=[a b c];

Wynik=roots(W);

WynikRE=real(Wynik)

WynikIMG=imag(Wynik)

[id,kom]=fopen('D:\zielinski.radek.npr\zad12out.m','wt');

fprintf (id,'20.4%f11.4f\n,1,2');

fclose(id)

end

%zadanie 5

%napisz funkcję obliczjącą pierwiastki wielomianu oraz czytającą parametr z

%klawiatury a następnie wczytać przy pomocy funkcji plot y oraz x, gdzie

%x= sin b, y = cos b

%funkcja b jest zmienna zmieniającą się w przedziale od - 20a do +20a

%wielomian w(x)=30abx^5+20ax^4-10abx^3-2abx^2-2bx+ab

function [y,wynik]=zad5 (a,b)

a=input('Wprowadz a: ')%wprowadz zmienna a z klawiatury

b=input('Wprowadz b: ')%wprowadz zmienna b z klawiatury

w=[30*a*b 20*a -10*a*b -2*a*b -2*b];

b=-20*a:20*a;%zakres zmiennej b

x=sin(b)

y=cos(b)

roots(w)%oblicza pierwiastki wielomianu w

plot(x,y)%wyswietla dunkcje x i y na JEDNYM WYKRESIE

grid on %wprowadzenie siatki na wykresie

xlabel ('os x')%opis osi x

ylabel ('os y')%opis osi y

end

---