1. Sekolah Dasar
  2. Sekolah Menengah Pertama
  3. Sekolah Menengah Atas
  4. Mata Pelajaran
  5. Programming

Buatlah sebuah fungsi (function) pada Bahasa pemrograman pascal, dimana function tersebut

Berikut ini adalah pertanyaan dari AREYAS pada mata pelajaran TI untuk jenjang Sekolah Menengah Atas

Buatlah sebuah fungsi (function) pada Bahasa pemrograman pascal, dimana functiontersebut memiliki 2 parameter inputan berupa angka, dan menghasilkan keluaran nilai berupa hasil perkalian 2 angka tersebut.

Contoh pemanggilan function:
Nilai := function_kali(10, 50);
Writeln(nilai);

Jawaban dan Penjelasan

Berikut ini adalah pilihan jawaban terbaik dari pertanyaan diatas.

Function (dalam bahasa pemrograman Pascal) dengan parameter input berupa 2 angkadan mengembalikan nilaihasil perkalian kedua angka tersebut adalah:

\boxed{\begin{aligned}&\texttt{function Kali(a,b:\:Integer):\:Integer;}\\&\texttt{begin}\\&\quad\texttt{Kali := a*b;}\\&\texttt{end;}\end{aligned}}

Contoh program sederhana di mana function tersebut dipanggil adalah sebagai berikut.

program Perkalian;
uses Crt;
function Kali(a, b: Integer): Integer;
begin
   Kali := a*b;
end;
{ PROGRAM UTAMA }
var
   a, b, nilai: Integer;
begin
   ClrScr;
   Write('Bilangan pertama: ');
   ReadLn(a);
   Write('Bilangan kedua: ');
   ReadLn(b);
   nilai := Kali(a, b);
   WriteLn(a, ' * ', b , ' = ', nilai);
end.
________________

Pembahasan

Contoh program tersebut meminta masukan berupa 2 angka (bilangan bulat/integer) dan kemudian mencetak hasil perkaliannya pada layar.

Dengan angka masukan 10 dan 50, hasil eksekusinya adalah:
Bilangan pertama: 10
Bilangan kedua: 50
10 * 50 = 500

(atau dapat dilihat pada gambar).

Function (dalam bahasa pemrograman Pascal) dengan parameter input berupa 2 angka dan mengembalikan nilai hasil perkalian kedua angka tersebut adalah:[tex]\boxed{\begin{aligned}&\texttt{function Kali(a,b:\:Integer):\:Integer;}\\&\texttt{begin}\\&\quad\texttt{Kali := a*b;}\\&\texttt{end;}\end{aligned}}[/tex]Contoh program sederhana di mana function tersebut dipanggil adalah sebagai berikut.program Perkalian;uses Crt;function Kali(a, b: Integer): Integer;begin    Kali := a*b;end;{ PROGRAM UTAMA }var    a, b, nilai: Integer;begin    ClrScr;    Write('Bilangan pertama: ');    ReadLn(a);    Write('Bilangan kedua: ');    ReadLn(b);    nilai := Kali(a, b);    WriteLn(a, ' * ', b , ' = ', nilai);end.________________PembahasanContoh program tersebut meminta masukan berupa 2 angka (bilangan bulat/integer) dan kemudian mencetak hasil perkaliannya pada layar. Dengan angka masukan 10 dan 50, hasil eksekusinya adalah:Bilangan pertama: 10Bilangan kedua: 5010 * 50 = 500(atau dapat dilihat pada gambar).

Semoga dengan pertanyaan yang sudah terjawab oleh henriyulianto dapat membantu memudahkan mengerjakan soal, tugas dan PR sekolah kalian.

Apabila terdapat kesalahan dalam mengerjakan soal, silahkan koreksi jawaban dengan mengirimkan email ke yomemimo.com melalui halaman Contact

Last Update: Wed, 19 Oct 22
<< Previous Post
Next Post >>