Kel 4 :Menyalin arsip (dengan mark)

 Kel 4 :Menyalin arsip (dengan mark)

Tugas Group 4 MJ1A Karyawan

Nama / Nim

1.       Narupi                  4311211010

2.       Almuaini              4311211011

3.       Rikardo                 4311211012

mas rikardo dan mbak iin please check and give me advice

Menyalin arsip ke arsip yang lain

Teory Algoritma Pemograman Mg 14

Teory Algoritma Pemograman Mg 14

Soal 2

•       Buatlah fungsi yang menerima masukan bilangan n dan mengeluarkan hasil faktorialnya.  •       Faktorial adalah bilangan bulat tidak negatif n didefinisikan sebagai :     n != 1x2x3x4x…xn, n>0 •       Panggil fungsi tsb dari program utama

Program menghitung hasil faktorial Function factorial(N : integer) //deklarasi N , Hasil_Factorial: integer Read (N) Hasil_factorial ç factorial(N) Write (Hasil_factorial) Function factorial(N : integer) Hasil_Factorial: integer For iç1 to N do Hasil_Factorial ç Hasil_Factorial * i End for Return Hasil_Factorial

Teory Algoritma Pemograman Mg 14

Teory Algoritma Pemograman Mg 14

Soal 1

Buatlah fungsi ini : Function abs(input x:real)àreal {mengembalikan harga mutlak x. Contoh : jika x=-10 maka nilai mutlaknya 10, jika x=10 maka nilai mutlaknya 10} Panggil fungsi tsb dari program utama

Program pengembalian harga mutlak {mengembalikan harga mutlak X kemudian menampilkan ke layar} Function abs(input X:real)àreal //deklarasi X, Harga_Mutlak : real Read(X) Harga_Mutlak ç abs(X) Write (Harga_Mutlak) Function abs(input X:real)àreal If X<0 then X  ç X *-1 Return X

Teory Alpro 10 Tipe Data Bentukan

Teory Alpro 10 Tipe Data Bentukan

These are just sample to make understand. so please modify it.

1.       Soal Pertama

—  Buatlah 3 tipe baru yang berasal dari tipe dasar

—  Buatlah 3 tipe terstruktur. Sebutkan juga elemen-elemen penyusunnya

1.       Type Luas : Record <panjang, lebar : integer> Persegi :luas Elemen Penyusunnya adalah —  Persegi.panjang —  Persegi.lebar 2.       Typer Isi : Record <Panjang, lebar, tinggi : integer> Kubus : Isi Elemen Penyusunnya adalah —  kubus.panjang —  kubus.lebar —  kubus.tinggi 3.       Type Kelas: Record <Meja, Kursi, Papan_tulis : Integer> Ruangl106 : kelas Elemen Penyusunnya adalah —  Ruang106.meja —  Ruang106.kursi —  Ruang106.Papan_tulis

2.  Soal Kedua.

a.       Buatlah tipe terstruktur bernama tipe Date, yang terdiri dari dd, mm, yy bertipe integer. Gunakan tipe terstruktur tersebut dalam algoritma.

b.      Algoritma membaca masukan sebuah tanggal, kemudian mengkonversi mm ke dalam string. Contoh :

Tanggal : 10

Bulan : 11

Tahun : 2012

Hasil konversi : 10 November 2012

Type date : Record<dd, mm, yy : Integer> Tanggal : date bulan : string //algoritma Read<tanggal.dd, tanggal.mm, tanggal.yy> Case <tanggal.mm> 1 : bulan ß “January” 2 : bulan ß “February” 3 : bulan ß “March” …. …. …. 12 : bulan ß “December” Otherwise : bulan ß “bulan tidak di kenal” End case Write <tanggal.dd, bulan, tanggal.mm>

2.  Soal Ketiga.

c.       Nilai pecahan disajikan dalam bentuk a/b, dengan syarat b≠0. a dinamakan pembilang, b dinamakan penyebut. Tulislah algoritma yang membaca dua nilai pecahan P1 dan P2, lalu menghitung hasil perkaliannya

Type pecahan : record <a, b : integer> P1, p2, p3 : integer Read<p1.a, p1.b, p2.a, p2.b> P3.a ß p1.a * p2.a P3.b ß p1.b * p2.b Write<p3.a / p3.b>