GAJI PEGAWAI PT. TELKOM
--------------------------------------------
Nama Pegawai       :   ?
Gol        :   ?
Gaji        :  
Pajak        :
Pinjaman    :   ?
Gaji Bersih    :
--------------------------------------------

Proses
    Gol=1 maka Gaji = 1500000
    Gol=2 maka Gaji = 2500000
    Gol=3 maka Gaji = 3500000
   
    Pajak = 15% dari Gaji
    Gaji Bersih  = Gaji  - Pinjaman  - Gaji Bersih

Menggunakan Bahasa C++

Include "iostream.h"
{
cout << "Gaji PT Telkom"
cout << "------------------------------------------------";
cout << "Nama Pegawai : "; cin >> nama;
cout << "Gol : ";cin>> gol;
cout << "Pajak : "; cin >> pajak;

}

testing

Yuk! Belajar Konsep Pemrograman Di Mesran.Blogspot.Com

Selesaikanlah Kasus Berikut :
JUDUL SOAL  http://hidedoor.com/servlet/redirect.srv/sruj/scyaetcar/sftlnaj/svwx/p1/2013/06/coba-selesaikan-kasus-berikut-ini.html

Berikut Jawaban Program :


#include<stdio.h>
#include<conio.h>
void main()
{
      int i,masukkan,hasil=1;
      printf("Input Nilai : ");scanf("%d",&masukkan);
     printf("Hasil : ");
           for(i=1;i<=masukkan;i++)
              {
                if(i==masukkan)
                     printf("%d",i);
        else
                           printf("%d*",i);

                     hasil=hasil*i;
           }
              printf(" = %d",hasil);


}

Demikilahlah postingan saya  Nama : James Hillery Sitohang  NPM : 12110234
Selamat Belajar Bahasa Pemrograman

Tugas Bahasa C

#include "stdio.h"
void main (){
int kode,jumlah;
char*nama;
float harga,total,diskon;

printf("Input penjualan \n");
printf("kode : ");scanf ("%i",&kode);
switch (kode){
case 1:nama="Televisi";harga=1750000;break;
case 2:nama="DVD";harga=650000;break;
case 3:nama="CD-ROOM";harga=450000;break;
}
printf("\nNama Produk : %s",nama);
printf("\nHarga : %.1f",harga);
printf("\nJumlah jual: ");scanf ("%i",&jumlah);
total=harga*jumlah;
printf("\nTotal Harga : %.2f",total);
if (total>=3000000)
diskon=total*0.1;
else
diskon=0;
printf("\nDiskon : %.2f",diskon);
}

Selamat mencoba....!!!!

http://mesran.blogspot.com/2013/05/tugas-si-m1206.html

PELAJARAN PERTAMA TENTANG PROGRAM PASCAL

jamessitohang512.blogspot.com

PELAJARAN PERTAMA TENTANG PROGRAM PASCAL

Apa sie yang anda ketahui tentang pascal??

belajar pascal gampang - gampang susah.

Yang bilang gampang itu, saat mereka tau, mengerti, dan memahami, serta menuangkan bahasa pascal itu ke sebuah program.

yang susahnya, paham tentang algoritmanya, tapi menuangkan kedalam bahasa pascal g bisa. 

Biar tidak berbelit - belit mengenai pascal, saya pun baru belajar. Saya akan memberikan contoh terlebih dahulu mengenai program pascal.

contoh program konversi

program konversi;

uses  wincrt;

var

    c:real;

    F:real;

    K:real;

    R:real;

begin

writeln('masukkan suhu celcius');

readln(c);

F:=(9/5*c)+32;

R:=(4/5)*c;

K:=273+c;

writeln('Hasil suhu celcius menjadi farenheit=',F);

writeln('Hasil suhu celcius menjadi reamur=',R);

writeln('Hasil suhu celcius menjadi Kelvin=',K);

readln;

end.

nah dari rumus tersebut, kita ulas 1 per 1

program konveksi==> merupakan judul dari program tersebut.

uses wincrt==> merupakan program pascal yang digunakan, apakah itu pascal yang berjalan di windows (menggunakan wincrt) atau pascal yang berjalan di dos (tanpa win).

var ==> merupakan variable yang digunakan.

Program ini bila di terjemahkan dalam algoritma maka:

(program konveksi)

1.masukkan suhu celcius

2.suhu celcius dimasukkan ke dalam rumus Farenheit, Kelvin, dan Reamur.

3.hasil

4.selesai

begitulah hasil algoritma bahasa pascal diatas, mau coba praktek belajar???

silahkan buat algoritma soal dibawah!

- buatlah algoritma dan terjemahkan ke dalam bahasa pascal tentang menghitung program luas persegi dan program keliling lingkaran!