| CARVIEW |
Select Language
HTTP/2 200
date: Sun, 12 Oct 2025 02:50:44 GMT
content-type: text/html; charset=UTF-8
server: cloudflare
x-frame-options: DENY
x-content-type-options: nosniff
x-xss-protection: 1;mode=block
vary: accept-encoding
cf-cache-status: DYNAMIC
content-encoding: gzip
set-cookie: _csrf-frontend=131a31a9b5128ae65f18f4c447a4c9f2c2ce9d97e317855da21e6871755e9a6fa%3A2%3A%7Bi%3A0%3Bs%3A14%3A%22_csrf-frontend%22%3Bi%3A1%3Bs%3A32%3A%224D1tZoIWAny3ft_KQDmrMsQs-ypoRb92%22%3B%7D; HttpOnly; Path=/
cf-ray: 98d34a9c09e08087-BLR
-module(lab02).-import(string,[concat/2]).-compile(export_all).%1mix - Pastebin.com
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- -module(lab02).
- -import(string,[concat/2]).
- -compile(export_all).
- %1
- mixBeverages(T1, T2) ->
- {concat(concat(element(1, T1), " + "), element(1, T2)), element(2, T1) + element(2, T2)}.
- %2
- isOlder(D1, D2) ->
- if
- D1 == D2 -> false;
- element(3, D1) < element(3,D2) -> true;
- element(3, D1) > element(3,D2) -> false;
- element(2, D1) < element(2,D2) -> true;
- element(2, D1) > element(2,D2) -> false;
- element(1, D1) < element(1,D2) -> true;
- element(1, D1) > element(1,D2) -> false
- end.
- %3
- moveDecimal([], _) ->
- [];
- moveDecimal([Head|Tail], D3) ->
- [math:pow(10, D3)*Head | moveDecimal(Tail, D3)].
- %4
- removeNegatives([]) ->
- [];
- removeNegatives([Head|Tail]) ->
- if
- Head >= 0 -> [Head|removeNegatives(Tail)];
- true -> removeNegatives(Tail)
- end.
- %5
- removeNegatives2(L1) ->
- helper(L1).
- helper([]) ->
- [];
- helper([Head|Tail]) ->
- if
- Head >= 0 -> [Head|helper(Tail)];
- true -> helper(Tail)
- end.
- %6
- calculatePay(T3) ->
- {element(1, T3), element(2, T3)*element(3, T3)}.
- %7
- generate(A1, A2, _) when
- A1 > A2 -> [];
- generate(A1,A2,A3) when
- (A1 =< A2) -> [A1 | generate(A1+A3, A2, A3)].
- %8
- getnth([], N) ->
- if
- length([]) == 0 -> {error, no_such_element};
- N < 1 -> {error, no_such_element};
- N > length([]) -> {error, no_such_element}
- end;
- getnth([Head|_], 1) ->
- Head;
- getnth([_|Tail], N) ->
- getnth(Tail, N-1).
- %9
- repeat(_, []) ->
- [];
- repeat([], _) ->
- [];
- repeat([Head1|Tail1], [Head|Tail]) ->
- lists:flatten([lists:duplicate(Head,Head1)|repeat(Tail1,Tail)]).
Advertisement
Add Comment
Please, Sign In to add comment
-
⭐✅ Exploit 2500$ in 15 Minutes⭐⭐⭐ G
JavaScript | 1 min ago | 0.25 KB
-
Free Crypto Method (NEVER SEEN BEFORE)⭐⭐ X
JavaScript | 1 min ago | 0.25 KB
-
⭐✅ Swapzone Glitch ✅ Working ⭐⭐ X
JavaScript | 1 min ago | 0.25 KB
-
✅ Make $2500 in 20 minutes⭐⭐⭐ S
JavaScript | 1 min ago | 0.25 KB
-
📌 Swapzone +37% glitch ⭐ 3
JavaScript | 2 min ago | 0.25 KB
-
⭐⭐⭐Make $15OO in 2O minutesV E⭐⭐
Java | 2 min ago | 0.10 KB
-
✅⭐ Make huge profits on trading ⭐⭐ S
JavaScript | 2 min ago | 0.25 KB
-
⭐⭐⭐Make $1500 in 20 minutes⭐⭐
Java | 2 min ago | 0.10 KB
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
