Program Switch Case (Pilihan Menu Makanan) dengan Bahasa C / C++

#include<stdio.h> main() {  int a;  printf("pilihan menu :\n");  printf("1. Baso\n");  printf("2. Mie Ayam\n");  printf("3. Teh Botol\n");  printf("pilih menu :\n");  scanf("%i",&a);  switch(a){      case 1:         puts ("Anda pilih Baso");         break;     case 2:         puts ("Anda pilih Mie Ayam");         break;     case 3:         puts ("Anda pilih Teh Botol");         break;     default:     puts("anda memilih diluar pilihan");     break;     ...

Read more »

Posted in: BAHASA C

Program Biaya Panggilan dengan Java

#include <stdlib.h> #include <stdio.h> int main() {     int jamA, menitA, jamB, menitB, detikA, detikB, detik, waktuA, waktuB, biaya;     printf("WAKTU PANGGILAN AWAL \n ");     printf("masukan waktu memulai panggilan(jam) :",jamA);     scanf("%i",&jamA);     printf("masukan waktu memulai panggilan(menit) :",menitA);     scanf("%i",&menitA);     printf("masukan waktu memulai panggilan(detik) :",detikA);     scanf("%i",&detikA);     printf("\n");          printf("WAKTU PANGGILAN AKHIR \n ");     printf("masukan waktu mengakhiri panggilan(jam) :",jamB);     scanf("%i",&jamB);     printf("masukan waktu...

Read more »

Posted in: BAHASA JAVA

Program Kalkulator dengan Java

#include<stdio.h> #include<string.h> int main(){ char menu [3]; int pertama, kedua, hasil; printf("=========================================\n"); printf("Selamat Datang di Program Kalkulator Saya\n"); printf("=========================================\n\n"); printf("=============================\n"); printf("Nama \t: Raka Dwi Aprian\n"); printf("NIM \t: 1205990\n"); printf("=============================\n\n"); printf("Mulai Menjalankan Kalkulator\n"); menu:  printf("====================\n");  printf(" +. Pertambahan\n");  printf(" -. Pengurangan\n");  printf(" *. Perkalian\n");  printf(" /. Pembagian\n");  printf(" ^. Pemangkatan\n");  printf(" #. Exit \n");  printf("====================\n");  printf("-------------->>> Silakan...

Read more »

Posted in: BAHASA JAVA

Syntax dari Statement Perulangan

·         STATEMENT ini digunakan untuk menjalankan satu atau beberapa statement sebanyak beberapa kali. Dengan kata lain, perulangan memungkinkan  untuk menjalankan beberapa statement hanya dengan menuliskan statement tersebut satu kali. Pada bahasa Pascal dikenal 3 jenis repetitive statement,yaitu: a.    for statement digunakan untuk mengulang dengan ketentuan yan telah diketahui/ditentukan. syntax:             For var:=nilai_awal  to nilai_akhir  do statement; atau             For var:=nilai_awal to nilai_akhir do statement; contoh: For a:= 1 to 10 do writeln(‘turbo...

Read more »

Posted in: BAHASA PASCAL

Program Menghitung Hasil Perkalian Matrik dengan Bahasa Pascal

program perkalian_matrix; var a,n: integer; a: array [1..2,1..3] of integer; b: array [1..3,1..2] of integer; begin writeln('program menghitungperkalianmatrik'); writeln(); for a:=1 to 3 do for n:=1 to 2 do begin write('masukkannilaimatrik a[',a,',',n,']='); readln(a[a,n]); end; writeln('matriks a'); for a:=1 to 3 do begin write('|'); for n:=1 to 2 do write(a[a,n]:5); write('|'); writeln; end; for a:=1 to 2 do for n:=1 to 3 do begin write('masukkannilaimatrik b[',a,',',n,']='); readln(b[a,n]); end; writeln; writeln('matriks b'); for a:=1 to 2 do begin write('|'); for n:=1 to 3 do write(b[a,n]:5); write('|'); writeln; end; writeln('makahasildarimatrik a*b='); for a:=1 to 3 do begin write('|'); for...

Read more »

Posted in: BAHASA PASCAL

Program Menghitung Bilangan Fibonacci dengan Bahasa Pascal

program bilangan; var a:integer; begin n:=1; while a<23 do begin writeln(a); a:=a+a; end; end...

Read more »

Posted in: BAHASA PASCAL

Program Menghitung Luas Persegi Panjang Bahasa Pascal

procedure luas (p,l:integer); var Luas:integer; begin Luas:= p*l; writeln('Luaspersegipanjang = ',luas) end; var a,n:integer; begin write('masukannilaipanjang = ');readln(a); write('masukannilailebar = ');readln(n); luas(a,n); end....

Read more »

Posted in: BAHASA PASCAL

Program Menghitung Luas Lingkaran dengan Bahasa Pascal

procedure luas (r:integer); var Luas:integer; begin Luas:= 3.14*r*r; writeln('Luaslingkaran = ',luas) end; var jari:integer; begin write('masukanjari-jarilingkaran = ');readln(jari); luas(jari); end....

Read more »

Posted in: BAHASA PASCAL

Program Menghitung Luas Persegi dengan Bahasa Pascal

Studi Kasus : Menghitung Luas Persegi Jawaban : procedure luas (sisi:integer); var Luas:integer; begin Luas:= sisi*sisi; writeln('Luaspersegi = ',luas) end; var a:integer; begin write('masukannilaisisi= ');readln(a); luas(a); end. ...

Read more »

Posted in: BAHASA PASCAL

Program Paket Nasi dengan Java

#include <stdlib.h> #include <stdio.h> int main () {     int menu, nasi=3000, ayam_bakar=7000, tahu=1000, tempe=1000, lalap=2000,     air_mineral=3000, sayur_asem=2000, gepuk=5000, air_hangat=1000,jumlah_pesanan,total,pajak,total_akhir;       printf("=========Selamat datang di Raka's Resto========== \n\n");     printf("PAKET MAKANAN \n");     printf("=============\n");     printf("Paket 1 \n");     printf("Paket 2 \n");     printf("Paket 3 \n");     printf("Silakan pilih paket menu yang ada :");     scanf("%d",&menu);     printf("Banyaknya pesanan :");     scanf("%d",&jumlah_pesanan);     printf("\n");       switch (menu){  ...

Read more »

Posted in: BAHASA JAVA