Program Akar Persamaan Kuadrat
Deklarasi
a,b,c :real
D :real
X1,X2 :real
Algoritma :
Input(a,b,c)
D <--
b*b – 4 * a * c
If D < 0 then
Output (Akar akar persamaan kuadrat imaginer)
Else
If
D > o then
X1 <-- (-b + SQRT(D)) / (2*a)
X2 <-- (-b - SQRT(D)) / (2*a)
Else { D = 0}
X1 <-- (-b + SQRT(D)) / (2*a)
X2 <-- X1
Endif
Output (X1,X2)
Endif
C(n)
Input 1
Output 2
<-- 5
* 6
- 2
< 1
>1
/ 3
+ 2
Misalkan, Cop :
Cop Input :
a
Cop Output : b
Cop <-- :
c
Cop * : d
Cop -
: e
Cop <
: f
Cop > :
g
Cop /
: h
Cop +
: i
T(n) = a + 2b + 5c + 6d + 2e + f + g +3h + 2i
program hitung_diskon_harga
Deklarasi:
Deklarasi:
harga, diskon, total : real
Algoritma:
input (harga)
if harga > 300000 then
diskon <-- harga * 0.4
total <-- harga - diskon
elseif (harga >= 150000) and (harga<=300000) then
diskon <-- harga * 0.2;
total <-- harga – diskon
else if harga < 150000 then
diskon <-- harga * 0.1
total <-- harga – diskon
if harga > 300000 then
diskon <-- harga * 0.4
total <-- harga - diskon
elseif (harga >= 150000) and (harga<=300000) then
diskon <-- harga * 0.2;
total <-- harga – diskon
else if harga < 150000 then
diskon <-- harga * 0.1
total <-- harga – diskon
endif
output (diskon);
output (total);
output (total);
C(n)
Input :
1
Output :
2
<-- : 6
> : 1
< : 1
>= : 1
<= : 1
- : 1
* : 3
And : 1
Misalkan Cop :
Cop Input : a
Cop Output : b
Cop <-- :
c
Cop > : d
Cop < : e
Cop >= : f
Cop <= : g
Cop - : h
Cop * : i
Cop And : j
T(n) = a + 2b + 6c + c + d + e + f + g + h + 3i + j
Algoritma Hitung_cashback
Deklarasi
jumlah, subtotal : integer
total : real
Algoritma
Input (jumlah)
subtotal ← jumlah * 5000
If (jumlah > 10)
total ← jumlah - 20000
else
total ← jumlah – 0
endif
output (total)
C(n)
Input = 1
Output = 1
← = 3
* 1
- 2
>1
Misalkan, Cop :
Cop Input : a
Cop Output : b
Cop ← : c
Cop * : d
Cop - : e
Cop > : f
T(n) = a + b + 3c + d + 2e + f
------------------------------------------------------------------------------------------
Algoritma Hitung_cashback
Deklarasi
jumlah, subtotal : integer
total : real
Algoritma
Input (jumlah)
subtotal ← jumlah * 5000
If (jumlah > 10)
total ← jumlah - 20000
else
total ← jumlah – 0
endif
output (total)
C(n)
Input = 1
Output = 1
← = 3
* 1
- 2
>1
Misalkan, Cop :
Cop Input : a
Cop Output : b
Cop ← : c
Cop * : d
Cop - : e
Cop > : f
T(n) = a + b + 3c + d + 2e + f
------------------------------------------------------------------------------------------
Program
Aritmatika_dua_buah_Pecahan
Deklarasi
Type pecahan : record
<a,b:integer>
P1,P2:Pecahan
P3:Pecahan
ALGORITMA
Input(P1.a
, P2.b)
Input(P2.a
, P2.b)
\\
hitung P3=P1+P2
P3.a <--
P1.a * P2.b + P1.b * P2.b
P3.b <--
P1.b * P2.b
Output(P3.a
, P3.b)
\\
hitung P3=P1-P2
P3.a <--
P1.a * P2.b - P1.b * P2.b
P3.b <--
P1.b * P2.b
Output(P3.a , P3.b)
\\
hitung P3=P1 * P2
P3.a <--
P1.a * P2.a
P3.b <--
P1.b * P2.b
Output(P3.a
, P3.b)
\\
hitung P3=P1/P2
P3.a <--
P1.a * P2.b
P3.b <--
P1.b * P2.a
Output(P3.a
, P3.b)
C(n)
*
10
<-- 8
Input
2
Output
4
-1
+
1
Misalkan
Cop :
Cop
X : a
Cop <-- : b
Cop Input : c
Cop Output : d
Cop - : e
Cop + : f
T(n)=
10a+8b+2c+4d+e+f
------------------------------------------------------------------------------------------
Procedure max_selection_sort_asc;
Deklarasi
arr_angka : array[1..n] of integer;
data: arr_angka
i,j,posisi_max : integer;
temp : integer;
Algoritma
input(data);
for i = n downto 2 do
posisi_max <--
1;
for j = 2 to i do
if(data[j] > data[posisi_max])
then
posisi_max <--
j;
endif
endfor
temp <--
data[posisi_max];
data[posisi_max] <--
data[i];
data[i] <--
temp;
endfor
output(data);
C(n)
= : n + (i*n)
atau n + n2
<--
: n + (i*n) + 3n atau n + n2 + 3n
> :
(i*n) atau n2
Input : 1
Output : 1
Misalkan Cop :
Cop = : a
Cop <-- :
b
Cop > :
c
Cop Input : d
Cop Output : e
T(n) = (n + (i*n))a + ((n + (i*n))+ 3n)b
+ (i*n)c + d + e
------------------------------------------------------------------------------------------
Tidak ada komentar:
Posting Komentar