java

(ketik di notepa>save as di folder sony) import java.io.*; public class latih6{ public static void main(String Arg[])throws IOException{ String str; int jumlah,harga=0;double total,disc=0; BufferedReader Get=new BufferedReader(new InputStreamReader(System.in)); System.out.print("jumlah lembar copy:");str=Get.readLine(); jumlah=Integer.parseInt(str); if (jumlah>500) harga=90; else if(jumlah>250) harga=105; else if(jumlah>100) harga=125; else harga=150; total=harga*jumlah; System.out.println("harga :"+harga); if (jumlah>600)disc=0.1*total; System.out.println("discount :"+disc+"\n Total Harga Rp."+total); System.out.println("total bayar Rp."+(total-disc)); } } ketik run>cmd Microsoft Windows XP [Version 5.1.2600] (C) Copyright 1985-2001 Microsoft Corp. C:\Documents and Settings\Sony>set path=C:\Program Files\Java\jdk1.5.0_11\bin C:\Documents and Settings\Sony>javac latih6.javac javac: invalid flag: latih6.javac Usage: javac where possible options include: -g Generate all debugging info -g:none Generate no debugging info -g:{lines,vars,source} Generate only some debugging info -nowarn Generate no warnings -verbose Output messages about what the compiler is doing -deprecation Output source locations where deprecated APIs are u sed -classpath Specify where to find user class files -cp Specify where to find user class files -sourcepath Specify where to find input source files -bootclasspath Override location of bootstrap class files -extdirs Override location of installed extensions -endorseddirs Override location of endorsed standards path -d Specify where to place generated class files -encoding Specify character encoding used by source files -source Provide source compatibility with specified release -target Generate class files for specific VM version -version Version information -help Print a synopsis of standard options -X Print a synopsis of nonstandard options -J Pass directly to the runtime system C:\Documents and Settings\Sony>java latih6 jumlah lembar copy:34 harga :150 discount :0.0 Total Harga Rp.5100.0 total bayar Rp.5100.0 C:\Documents and Settings\Sony>

contoh bahasa c volume kubus =s*s*s #include #include main() { int s,v=0; clrscr(); printf("menhitung volume kubus\n--------------------"); printf("\n masukkan sisi kubus:"); scanf("%d",&s); v=s*s*s; printf("nilai volume kubus:%d",v); } contoh bahasa c++ membuat volume kubus =s*s*s #include"iostream.h" #include"conio.h" void main() { int s,v=0; clrscr(); cout<<"menghitung volume kubus\n--------------"; cout<<"memasukkan sisi kubus:"; cin>>s; v=s*s*s; cout<<"nilai volume kubus:"<

#memngkonversi bilangan* uses crt; var bilangan:integer; function decTOBin(desimal:integer):string; var hasilbagi, sisa : integer; bin:char; bilBiner:string; begin hasilBagi := desimal div 2; bilBiner :=''; {syarat prulangan :selama hasil bagi lebih besar sama dengan 1} while (hasilBagi >=1) do begin sisa :=desimal mod 2; if(sisa =0)then bin :='0' else if (sisa=1) then bin :='1'; {menggabung sisa pada setiap perulangan untuk membentuk digit biner} bilBiner := bin + bilBiner; desimal:=hasilBagi; hasilBagi := desimal div 2; end; deCTOBin :='1'+bilBiner; end; BEGIN bilangan :=200; write('bilangan binernya :', deCTOBin(bilangan)); readln; end. #program penjualan* uses crt; var b:string; h,y,u,by,tb:real; lagi:char; begin writeln('toko"laris manis" '); writeln ('__________'); tb:=0; lagi := 'y'; while lagi= 'y' do begin write ('barang :');readln(b); write ('harga:'); readln(h); write ('unit:'); readln(u); by:= h*u; writeln('bayar :',by:0:0); writeln ('coba lagi (y/t); ');readln(lagi); writeln; writeln; tb:= tb+by; end; writeln('total bayar :',tb:0:0); end.

blog

Setelah anda mengetahui cara membuat efek Kembang Api pada Blog dan beberapa waktu yang lalu kami juga pernah Share cara memasang 15 Animasi super keren dan membuat Spoiler pada blog maka kali ini kami akan menunjukkan pada anda cara memasang Animasi Meteor Jatuh.

Haaahhhh…Meteor??? Yaahh benar sekali, anda dapat mempercantik tampilan blog anda dengan memasang animasi Meteor Jatuh. Dengan adanya efek ini, diharapkan tampilan blog anda kelihatan lebih canggih dan menarik. Berikut ini cara membuatnya :

• Silakan anda Login terlebih dahulu ke dalam Blogger
• Kemudian klik menu Rancangan -> Add Widget (HTML/JavaScript)
• Kemudian masukkan kode dibawah ini

<script language="javascript">nd_mode="meteor";nd_sound="on";nd_vAlign="bottom";nd_hAlign="right";nd_vMargin="10";nd_hMargin="10";nd_target="_top";</script><script language="javascript" src="http://cayunkatel.googlecode.com/files/meteorjaruh.js"></script>

• Jika sudah, silakan Simpan dan lihatlah hasilnya.

Saat efek Meteor ini berjalan di blog anda, akan terdapat menu Close yang muncul di bagian sebelah kanan bawah. Itu artinya, anda dapat menutup atau mematikan efek Meteor ini jika sudah tidak diinginkan.

program hitung_diskon_harga;

uses crt;

var harga, diskon, total : real;

begin clrscr;

writeln ('MENGHITUNG DISKON DAN TOTAL HARGA BELANJA');

PROGRAM DAFTAR_PENGUNJUNG_KONSER;
USES CRT;
LABEL
Y,N;
CONST
H_TKT=300000;
VAR
N_PMBL,N_BAND,N_KLS :STRING;
J_BL,TH,DSK,TB,UB,UK :REAL;
NO :CHAR;
BEGIN

kalakulator

Tutorial Pascal Membuat Kalkulator Sederhana

by admin on Oct.14, 2011, under Pascal

Pascal Calculator

Tutorial Pascal untuk membuat kalkulator sederhana berguna untuk anda yang sedang mendapatkan tugas dari sekolah. Berikut adalah source code nya ..
[sourcecode language="pascal"]
program kalkulator;
uses crt;
var nil1,nil2,hasil : real;
a : char;
begin
clrscr;
write(‘angka pertama = ‘);
readln(nil1);
write(‘parameter + – * / = ‘);
readln(a);
write(‘angka kedua = ‘);
readln(nil2);
case a of
‘+’: hasil := nil1+nil2;
‘-’: hasil := nil1-nil2;
‘*’: hasil := nil1*nil2;
‘/’: hasil := nil1/nil2;
end;
write(‘hasil = ‘,hasil :12:2);
readkey;
end.
[/sourcecode]