...
1. Fakultet
Code Block |
---|
...
| ||
function y = |
...
fact(x)
if x>1
y= fact(x-1)*x;
else
y=1;
end
end |
2. Fibonacci
Code Block | ||
---|---|---|
| ||
function f = fibnum(n)
if n == 0
f = 0;
elseif n == 1
f = 1;
else
f = fibnum(n-1) + fibnum(n-2);
end
end |
3. Pascals trekant
Code Block | ||
---|---|---|
| ||
function p = pascal(n)
p = ones(1,n);
if n <= 2
return
end
forrige_linje = pascal(n-1);
for i = 2 : n-1
p(i) = forrige_linje(i-1) + forrige_linje(i);
end
end |
4. Palindrom
Code Block | ||
---|---|---|
| ||
function p = palindromTest(ord)
if length(ord) == 1 || length(ord) == 0 |
Oppgave 2 - Repitisjon av for-løkker
Code Block for i = 1:length(list) if list(i) <= 0 list(i) = 1; end end
Code Block forelopig_sum_tabell = zeros(1,length(list)); forelopig_sum_tabell(1) = list(1); for i = 2:length(list) forelopig_sum_tabell(i) = forelopig_sum_tabell(i-1)+list(i); end forelopig_sum_tabell
Oppgave 3_ Doble for løkker
Code Block |
---|
%1 mat = [ 1, 3,-3, 5,23; 23, 2,34,13,32; 33,67,64, 5,-9; 46,-6, 6,64, 8; 2, 3,19,23,-4]; %2 i = 1; for row = mat j = 1; for element = row' if element < 0 mat(j,i) = -element; end jp = j+1; endelse i =if i+1; end mat %3 tall = mat(1,1); for row = mat ord(1) == ord(length(ord)) && palindromTest(ord(2:(length(ord)-1))) for element = row' p = 1; if element > tallelse tallp = element0; end end end tall |
Oppgave 4 - Den lille multiplikasjonstabellen
Code Block |
---|
mult = [1:10]'*[1:10] |
Oppgave 5 - Formasjonsteknologi grunnkurs
5. Exponent
Code Block | ||
---|---|---|
| ||
function y = ten_exp(n) | ||
Code Block | ||
function kontroll mat = round(rand([3,12])); forif rown == mat'0 svary = isapproved(row)1; else row' y = 10 * fprintf(' gir svaret %i.\n',svarten_exp(n-1); end end function svar = isapproved(list) svar = sum(list(1:6))>= 5 && sum(list(7:12))>=4; end |