Wednesday, October 7, 2015

Algoritma Pemrograman Bilangan Prima

Kelompok Bilangan Prima
D03112023 Ninda Fitria Pratiwi
D03112033 Rini Apriyani
D03112043 Toni Haryanto
D03112051 Rissa Vianita
D03112055 Ari Fitriando


BAHASA JAVA  

public class loop4_prima {
    public static void main(String[] args) {
        Scanner s=new Scanner(System.in);
        System.out.printf("Input sebuah bilangan : ");
        int n=s.nextInt();
        int b = 0;
        for(int i=1;i<=n;i++){
        if(n%i==0)
            b=b+1;  }
        if(b==2)
            System.out.printf("Prima ");
        else
            System.out.printf("Bukan Prima ");
    }
}

BAHASA C++
#include <conio.h>
#include <stdio.h>

main()
{
      int bil, i, jum;
     
      printf("---Program Menentukan Bilangan Prima---\n\n");
      printf("Masukkan Bilangan\t: ");
  scanf("%i",&bil);
      jum=0;
      for(i=1;i<=bil;i++)
      {
                         if(bil%i==0)
                         {
                                     jum++;
                         }
      }
                         if(jum==2)
                         {
                                   printf("\n%i adalah Bilangan Prima", bil);
                         }
                         else
                                   printf("\n%i adalah Bukan Bilangan Prima", bil);
     
      getch();
}

PHP
<form action="" method="post">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr><td width="15%">Masukkan Bilangan</td>
<td width="2%">:</td>
<td width="83%"><input type="text" name="cek" /></td></tr>
<tr>
<td colspan="3"><input type="submit" value="hasil" name="tombol"/></td><tr>
</table>
</form>
<?php
if($_POST[cek]!=""){
$a=$_POST['cek'];
$b=sqrt($a);

for($c=2;$c<=$b;$c++){
if(($a % $c) == 0){
$d = "Bukan Bilangan Prima";
}
else{
$d= "Bilangan Prima";
}
}
echo $d;
}
?>
HTML
<html>
<head> 
<script language=javascript >
 function cek() {
 var bil=form.bil.value; 
 for (i=2;i<bil;i++){
 if (bil%i==0) { 
 prima=0;break;
 } 
 else {
 prima=1;
 }
 }
 if (prima) { 
 alert('bilangan prima');
 } else { 
 alert('bukan bilangan prima');
 } 
 }
 </script></head> 
 <body> <form name=form> 
 Masukkan bilangan : <input name=bil type=text > 
 <br>
 <input type=button onclick="cek()" value=cek>
 </form>
 </body> 
 </html>
RUBY
#!/usr/local/bin/ruby
state = Numeric.new
print "2,3,"
(4..10000).each do
   |i|
   (2..(Math.sqrt(i).ceil)).each do
      |thing|
      state = 1
      if (i.divmod(thing)[1] == 0)
         state = 0
         break
      end
   end
   print "#{i}\," unless (state == 0)   
end
print "\n"
exit

SOURCE CODE “bilangan prima” menggunakan PYTHON

print("Program ini untuk mencari bilangan prima dalam jangkauan nilai input yang diberikan")
n = int(input("Masukkan suatu nilai "))
print("Bilangan prima sampai nilai", n, "adalah:")

for x in range(2, n + 1):
    if(x % 2 == 1 or x == 2):
        print(x, "merupakan bilangan prima")

if(n < 2):
print("Error, nilai untuk bilangan prima harus lebih besar dari 1")

SOURCE CODE “bilangan prima” menggunakan PASCAL

program prima;
{program akan membantu menentukan apakah bilangan yang di inputkan bilngan prima atau bukan}
uses crt;
{Deklarasi variabel}
var
bil,s : integer;
{Deskripsi program}
begin
clrscr;
write (‘Masukkan Bilangan [1 – 2 milyar] :’);
readln (bil);

if bil <= 1 then
begin
write ('Bukan Bilangan Prima');

end;

s := 2;
repeat
if (bil mod s = 0) and (bil 2) then
begin
write (‘Bukan bilangan prima’);

end;
s := s + 1;
until ( s >= bil div 2);
write (‘Bilangan Prima’);
readln;
End.






Algoritma bilangan prima
KAMUS   i     : integer   bil   : integer   prima : booleanALGORITMA   prima ← false   input (bil)   if (bil=2) then      prima ← true   elsep      for i ← 2 to bil-1 do         if (bil mod i = 0) then            prima ← false            exit for // keluar dari looping         else            prima ← true         endif      endfor   endif   if (prima) then // prima=true      output ("Bilangan Prima")   else      output ("Bukan Bilangan Prima")   endif

2 comments: