Setelah berusaha memaksa diri untuk belajar, akhirnya ketemu juga. Caranya : jawab pertanyaan orang lain… hehehe. Salah satunya pertanyaan yang ini nih :
Cara membuat flowchart dari suatu listing program.
Pertanyaan & Listing program diambil dari :
http://id.answers.yahoo.com/question/index;_ylt=AvmXi46dtU9Rhwzg6DO.2N8XZnRG;_ylv=3?qid=20090825092136AAqW9Nk
Saya membuat flowchart ini menggunakan Microsoft Office Visio 2003, untuk bisa mendapatkan source mentahnya. Silakan kirim pesan di http://www.nusinau.com/contact/, nanti secepatnya akan saya kirim. Silakan download Flowchart Perhitungan Nilai
43 responses to “Cara Membuat Flowchart dari Suatu Listing Program”
thankz ya bro…
sama-sama .. :)
bro,,,
kayaknya gw sangat buth bantuan2 U,,,,,
gw anak BSI semester pertama,,,,
lagi ga ngerti2nya masalah ginian,,,,,
minta alamat FB donk brow,,,,,,
@adhie
disini aja deh .. klo bisa bantu, pasti tak bantu .. :)
bro…qu ank BSI ne semester 1 gw kagak ngerti ne pelajaran sm sekali gw da pr bs minta tolong ga
1.buatlah flowchartnya dari pseudocode berikut ini :
a.masukkan kode barang
b.masukkan harga barang
c. masukkan jumlah barang
d.hitung bayar =harga * jumlah barang
e.jika bayar>-100.000 maka diberikan discount 10%,selain
dari itu tidak mendapat discount
f.hitung total bayar = bayar-discount
g.cetak total bayar
2.buatlah flowchartnya dari pseudocode berikut ini :
a.diketahui phi=3.14
b.masukkan nilai jari-jari (f)
c.hitung keliling = 2* phi *1
d.cetak keliling
e. ingin menghitung kembali?jika ya kembali ke proses
awal,jika tidak maka program berhenti
3.buatlah flowchartnya pseudocode berikut ini :
a.masukkan pilihan
b.jika pilihan=1 maka menu=”nasi goreng”
jika pilihan=2 maka menu=”mie goreng”
jika pilihan=3 maka menu=”capcay”
c.cetak menu
d.ingin pilih kembali?jika ya maka kembali ke proses
awal ,jika tidak maka program berhenti
HARUS DIKERJAKAN DENGAN PAKAI”FISIO” DAN TIDAK BOLEH PAKAI WORD
minta contohnya if then else yang leih komplit dong !
kayak data penjualan barang,tenks yah
:)
@karina
boleh .. tapi mana source codenya ..
klo ada nanti tak bikin flowchartnya wis ..
:)
kayaknya Q butuh banget bantuan qM nhi,Q anak SMK semester 2,lagi g’ ngerti2nya nhi mslh pembuatan flocart,BUATIN donk……..?????
INI KODE flocarnya 1 2 3 4 5 6 7 8 9 10
n0 n1 n2 n3 n4…….. n10
listingnya
<?
for($n=10; $n
menentukan angka terbesar hingga terkecil,,misalnya
10 9 8 7 6 5 4 3 2 1
@sakina
gimana tuh? maksudnya?
kirim aja lewat http://www.nusinau.com/send-article/
hei…bisa minta bantuan ga tentang visio??tolong di balas secepatnya.thx
wah thanks nih
bisa jadi referensi
kk tolong ajarin donk cara bikin program pakai pascal,aku ada tugas kuliah nih
ini kk program yg harus dibikin…
nilai bobot
>85 A
70-84 B
55-69 C
<54 D
klo bisa sekalian flowchartnya kk,,,terima kasih
hemm… for adalah looping
saya rasa flowchart nya tidak seperti itu
tlong,info’y bgaimana cara membuat flowchart dengan 6 kondisi atau statment???????????
sya mau buat flow chart dengan bahan sebagai berikut :
1.nilai > 90 grade = A
80 < nilai <= 90 grade = B
70 < nilai <= 80 grade = C
60 < nilai <= 70 grade = D
nilai <= 60 grade = E
2.jumlah hari pada bulan tertentu & tahun tertentu
hallo,ttolong bantu aq “buat flowchart dan bahasa natural dalam menghitung luas lingkaran dan menampilkan hasilnya.
procedure TForm1.passBtnClick(Sender: TObject);
var i,j,nmin,nmax,nminr,nmaxr,nming,nmaxg,nminb,nmaxb,jno,tnot:integer;
tawal:TDateTime;
rowa,rowa1,rowa3,rowb:pByteArray;
nois,atas,bwh,kiri,kanan:boolean;
begin //Bandpass
try
tawal:=now;
if pilih=false then
begin
xAwal:=0;
yAwal:=0;
xAkhir:=image1.Picture.Width-1;
yAkhir:=image1.Picture.Height-1;
end else image1.Canvas.Rectangle(xAwal,yAwal,xAkhir,yAkhir);
image2.Picture:=image1.Picture;
image2.Visible:=true;
image1.Picture.Bitmap.PixelFormat:=pf24bit;
image2.Picture.Bitmap.PixelFormat:=pf24bit;
gauge1.MaxValue:=yAkhir;
label18.Caption:= ”;
screen.Cursor:=crhourglass;
nminr:=strtoint(edit2.Text);
nmaxr:=strtoint(edit5.Text);
nming:=strtoint(edit3.Text);
nmaxg:=strtoint(edit6.Text);
nminb:=strtoint(edit4.Text);
nmaxb:=strtoint(edit7.Text);
nois:=false;
atas:=true;
bwh:=true;
kiri:=true;
kanan:=true;
nmin:=0;nmax:=0;
for j:=0 to yAkhir do
for i:=0 to xAkhir*3 do
begin
rowa:=image1.Picture.Bitmap.ScanLine[j]; //gambar asli
if (i mod 3=0) and ((rowa[i] nmaxb))
and((rowa[i+1] nmaxg))
and((rowa[i+2] nmaxr)) then
begin //blue
nmin:=nminb;
nmax:=nmaxb;
nois:=true;
end else if (i mod 3=1) and((rowa[i] nmaxg))
and((rowa[i-1] nmaxb))
and((rowa[i+1] nmaxr)) then
begin //green
nmin:=nming;
nmax:=nmaxg;
nois:=true;
end else if (i mod 3=2) and((rowa[i] nmaxr))
and((rowa[i-2] nmaxb))
and((rowa[i-1] nmaxr)) then
begin //reed
nmin:=nminr;
nmax:=nmaxr;
nois:=true;
end;
if nois then
begin
rowb :=image2.Picture.Bitmap.ScanLine[j];
if (j-1) (image1.Picture.Height-1)*3 then bwh:=false
else rowa3:=image1.Picture.Bitmap.ScanLine[j+1];
if (i-3)(image1.Picture.Width-1)*3 then kanan:=false;
jno:=0;tnot:=0;
if (rowa1[i-3]>= nmin)and(rowa1[i-3]=nmin)and(rowa1[i]=nmin)and(rowa1[i+3]=nmin)and(rowa [i-3]=nmin)and(rowa [i+3]= nmin)and(rowa3 [i-3] = nmin)and(rowa3[i] = nmin)and(rowa3[i+3] <= nmax)and bwh and kanan then begin
inc(jno);tnot:=tnot+rowa3[i+3]
end;
if jno 0 then rowb[i]:=round(tnot/jno);
nois:=false;
atas:=true;
bwh:=true;
kiri:=true;
kanan:=true;
end;
gauge1.Progress:=j;
end;
image2.Refresh;
toolbutton3.Enabled:=true;
toolbutton5.Enabled:=true;
toolbutton7.Enabled:=true;
passbtn.Enabled:=true;
savebtn1.Enabled:=true;
stopbtn.Enabled:=true;
zoomin1.Enabled:=true;
zoomout1.Enabled:=true;
originalsize1.Enabled:=true;
BitBtn10.Enabled:=true;
Histobtn2.Enabled:=true;
if pilih then image1.Canvas.Rectangle(xAwal,yAwal,xAkhir,Yakhir);
screen.Cursor:=0;
label18.Caption:=FormatDateTime(‘ “Durasi: “ss:zzz”ms” ‘,now-tawal);
except
end;
end;
bisa bantu bikin flochartnya ga???
tolong di bantu
Y=1-(1/2)2+(1/3)3-(1/4)4+(1/5)5-………..(1/10)10
tolong di balas sec epatx
tolong di bantu
Y=1-(1/2)2+(1/3)3-(1/4)4+(1/5)5-………..(1/10)10
tolong di balas secepatx
tolong buatin flowchart tentang rumus matematika dunk….
ntar kirimkan ke email aQ….
TOLONg ya brow….
PLEase….
@rian
mas linknya C++ ap???
saya ingin bertanya bagaimana caranya membuat flowchart untuk
ooo*
OO**
O***
****
saya lagi bingung nih,sebentar lagi mau buat tugas akhir tapi cara membuat program blm bisa benar,tolong kasih saran dong!trimakasih
package latihan;
import javax.swing.JOptionPane;
public class Main {
public static void main(String[] args) {
String ANGKAtemp;
int A, B, C, D, Min, Maks;
float AVG;
ANGKAtemp = JOptionPane.showInputDialog(“MASUKAN ANGKA PERTAMA : “);
A = Integer.parseInt(ANGKAtemp);
ANGKAtemp = JOptionPane.showInputDialog(“MASUKAN ANGKA KEDUA : “);
B = Integer.parseInt(ANGKAtemp);
ANGKAtemp = JOptionPane.showInputDialog(“MASUKAN ANGKA KETIGA : “);
C = Integer.parseInt(ANGKAtemp);
ANGKAtemp = JOptionPane.showInputDialog(“MASUKAN ANGKA KEEMPAT : “);
D = Integer.parseInt(ANGKAtemp);
if ( A>B ){ if ( A>C ) Maks = A; else Maks = C; }
else { if ( B>C ) Maks = B; else Maks = C; }
if ( A<B ){ if ( A<C ) Min = A; else Min = C; }
else { if ( BD ){ if ( A>D ) Maks = A; else Maks = D; }
else { if ( B>D ) Maks = B; else Maks = D; }
AVG =(float) (A+B+C+D)/4;
System.out.println(“\nNilai Asal : “);
System.out.println(“\nA = ” + A + “, B = ” +B + “, C = “+ C + “, D = “+ D);
System.out.println(“\nNilai Maksimum : “+ Maks);
System.out.println(“\nNilai Minimum : “+ Min);
System.out.println(“\nNilai Rata-rata : “+ AVG);
tolong bantu,bagaimana membuat flowchartny?…thx
mo tnya bro,gw gk ngerti sm sx tntng flowchart, trus TA gw yg tentang perancangan game lwt VB disuruh bkn flowchartnya,,… blh gk bro minta tolong contoh perancangan game yg pake VB dibikinin flowchartnya? thanks b4…. God bless
Wah Terimakasih !! Saya Benar2 Tertolong…
Sukses Selalu gan “:D
Om Nu,,,, bantuin dong om dapat tugas dari pak dosen gini soalnya
1. Buat algoritma, flowchart dan program untuk menghitung luas persegi panjang, dimana panjang dan lebarnya dimasukkan pada saat program dijalankan
tapi belum ngerti apa-apa so baru nemu yang kayak ginian…
Makasih om
tlg bantuin donk buatin program pascal nya, hasilnya kyk gni:
*****
****
***
**
*
tlg ya… mksh… :)
Pak ! :D
bang, kalo program yang bisa buat flowchart dgn cara kita menginputkan source code nya ada ga ?
ini source code saya>>
/*This program prints a calendar for a year specified. The user enters a
year for the calendar and the programs automatically prints the calendar
in text format.
The codes are: day_code (0 = Sun, 1 = Mon, etc.)
leap_year (0 = no leap year, 1 = leap year) */
#include
#include
#define TRUE 1
#define FALSE 0
int get_day_code (int year);
int get_leap_year (int year);
void print_calendar (FILE *fout, int year, int day_code, int leap_year);
int get_year (void);
main()
{
int year, day_code, leap_year;
FILE *fout;
fout = fopen (“calendar.txt”, “w”);
year = get_year();
day_code = get_day_code (year);
leap_year = get_leap_year (year);
print_calendar(fout, year, day_code, leap_year);
printf(“Open up ‘calendar.txt’ to see your calendar…n”);
system(“pause”);
}
int get_year (void)
{
int year;
printf (“Enter a year: “);
scanf (“%d”, &year);
return year;
}
int get_day_code (int year)
{
int day_code;
int x1, x2, x3;
x1 = (year – 1.)/ 4.0;
x2 = (year – 1.)/ 100.;
x3 = (year – 1.)/ 400.;
day_code = (year + x1 – x2 + x3) %7;
return day_code;
}
int get_leap_year (int year)
{
//if((year% 4) == 0 );
if(year% 4==0 && year%100 != 0 || year%400==0)
return TRUE;
else return FALSE;
}
void print_calendar (FILE *fout, int year, int day_code, int leap_year) //function header
{
int days_in_month, /* number of days in month currently
being printed */
day, /* counter for day of month */
month; /* month = 1 is Jan, month = 2 is Feb, etc. */
fprintf (fout,” %d”, year);
for ( month = 1; month <= 12; month++ ) {
switch ( month ) { /* print name and set days_in_month */
case 1:
fprintf(fout,"nnJanuary" );
days_in_month = 31;
break;
case 2:
fprintf(fout,"nnFebruary" );
days_in_month = leap_year ? 29 : 28;
break;
case 3:
fprintf(fout, "nnMarch" );
days_in_month = 31;
break;
case 4:
fprintf(fout,"nnApril" );
days_in_month = 30;
break;
case 5:
fprintf(fout,"nnMay" );
days_in_month = 31;
break;
case 6:
fprintf(fout,"nnJune" );
days_in_month = 30;
break;
case 7:
fprintf(fout,"nnJuly" );
days_in_month = 31;
break;
case 8:
fprintf(fout,"nnAugust" );
days_in_month = 31;
break;
case 9:
fprintf(fout,"nnSeptember" );
days_in_month = 30;
break;
case 10:
fprintf(fout,"nnOctober" );
days_in_month = 31;
break;
case 11:
fprintf(fout,"nnNovember" );
days_in_month = 30;
break;
case 12:
fprintf(fout,"nnDecember" );
days_in_month = 31;
break;
}
fprintf(fout,"nnSun Mon Tue Wed Thu Fri Satn" );
/* advance printer to correct position for first date */
for ( day = 1; day <= 1 + day_code * 5; day++ )
fprintf(fout," " );
/* print the dates for one month */
for ( day = 1; day 0 ) /* before Sat? */
/* move to next day in same week */
fprintf(fout,” ” );
else /* skip to next line to start with Sun */
fprintf(fout, “n ” );
}
/* set day_code for next month to begin */
day_code = ( day_code + days_in_month ) % 7;
}
}
permisi,,,aku mw tanya ni,,,
aku lagi bingung dsruh bwat program pertukaran be2rapa mata uang..minta tolong bisa gak kasi tau contoh program konverter beberapa mata uang…
trima kasih bantuannya….
hai gan,bisa kasih tau gak caranya bikin suatu program keuangan dengan menggunakan Mc.acces/VB 0.6?
mas nu aku tlong buat kan listing program yg mnarik dong “APA SAJA” yg mnggunakan function,array,if else.
sya klo mmkai 1fungsi msh bsa tp ini d.sruh bkin program d.gabung2 mmkai fngsi trsbut,,ssah mas failed trus mas sya!!!
tlong d.bantu ya mas nu,,trima kasih sblum ny!!
Mas..
bisa bantuin bikinin flowchart dari kode ini?
help…
program onlinetiket_stmikyuda;
uses wincrt;
var
jurusan,jenistiket,nama,alamat: string;
total,diskon,bayar,angka: integer;
harga:real;
begin
clrscr;
gotoxy(35,12);Writeln(‘Selamat Datang’);
readln;
gotoxy(12,13);writeln(‘DI LAYANAN PEMESANAN ONLINE TIKET PT.KAI(Kereta Api Indonesia)’);
readln;
gotoxy(29,14);writeln(‘Programmer : Yuda Perkasa’);
readln;
clrscr;
writeln(‘ Pemesanan Tiket Kereta Api Online Kelas Executive ‘);
writeln(‘ Tujuan Tebing Tinggi,Lahat,Muara Enim,Prabumulih,Kertapati ‘);
writeln(‘ PT.KAI(Kereta Api Indonesia) ‘);
writeln(‘+————————-+————————–+————————+’);
writeln(‘| Kode Tujuan | Dewasa | Anak-Anak |’);
writeln(‘+————————-+————————–+————————+’);
writeln(‘|[1] Tebing Tinggi | Rp.130.000 | Rp.100.000 |’);
writeln(‘|[2] Lahat | Rp.140.000(Disc 5%) | Rp.110.000(Disc 3%) |’);
writeln(‘|[3] Muara Enim | Rp.150.000(Disc 7%) | Rp.120.000(Disc 5%) |’);
writeln(‘|[4] Prabumulih | Rp.160.000 | Rp.130.000 |’);
writeln(‘|[5] Kertapati | Rp.170.000(Disc 10%) | Rp.140.000(Disc 7%) |’);
writeln(‘+————————-+————————–+————————+’);
writeln(‘NB:Untuk Jenis Tiket Silakan Masukan Dewasa Atau Anak-anak’);
writeln(”);
writeln(‘Silahkan Isi Data Dibawah Ini :’);
write(‘- Nama Pemesan : ‘);readln(nama);
write(‘- Alamat Pemesan : ‘);readln(alamat);
write(‘- Tujuan : ‘);readln(jurusan);
write(‘- Jenis Tiket : ‘);readln(jenistiket);
write(‘- Banyak Tiket : ‘);readln(total);
write(‘- Harga Bayar : ‘);
if (jurusan=’1′) or (jurusan=’Tebing Tinggi’) and (jenistiket=’Dewasa’) then harga:=130000;
if (jurusan=’1′) or (jurusan=’Tebing Tinggi’) and (jenistiket=’Anak-anak’) then harga:=100000;
if (jurusan=’1′) or (jurusan=’Tebing Tinggi’) and (jenistiket=’Anak’) then harga:=100000;
if (jurusan=’2′) or (jurusan=’Lahat’) and (jenistiket=’Dewasa’) then harga:=140000-(140000*0.05);
if (jurusan=’2′) or (jurusan=’Lahat’) and (jenistiket=’Anak-anak’) then harga:=110000-(110000*0.03);
if (jurusan=’2′) or (jurusan=’Lahat’) and (jenistiket=’Anak’) then harga:=110000-(110000*0.03);
if (jurusan=’3′) or (jurusan=’Muara Enim’) and (jenistiket=’Dewasa’) then harga:=150000-(150000*0.07);
if (jurusan=’3′) or (jurusan=’Muara Enim’) and (jenistiket=’Anak-anak’) then harga:=120000-(120000*0.05);
if (jurusan=’3′) or (jurusan=’Muara Enim’) and (jenistiket=’Anak’) then harga:=120000-(120000*0.05);
if (jurusan=’4′) or (jurusan=’Prabumulih’) and (jenistiket=’Dewasa’) then harga:=160000;
if (jurusan=’4′) or (jurusan=’Prabumulih’) and (jenistiket=’Anak-anak’) then harga:=130000;
if (jurusan=’4′) or (jurusan=’Prabumulih’) and (jenistiket=’Anak’) then harga:=130000;
if (jurusan=’5′) or (jurusan=’Kertapati’) and (jenistiket=’Dewasa’) then harga:=170000-(170000*0.1);
if (jurusan=’5′) or (jurusan=’Kertapati’) and (jenistiket=’Anak-anak’) then harga:=140000-(140000*0.07);
if (jurusan=’5′) or (jurusan=’Kertapati’) and (jenistiket=’Anak’) then harga:=140000-(140000*0.07);
writeln(‘Rp.’,total*harga:0:0);
writeln(”);
writeln(‘Terimakasih Atas Pemesanannya’);
writeln(‘Tekan ENTER Untuk Melihat Data Pemesanan’);
readln;
clrscr;
begin
gotoxy(35,2);writeln(‘Data Pemesanan’);
writeln(”);
writeln(‘Nama Pemesan : ‘,nama);
writeln(‘Alamat Pemesan : ‘,alamat);
writeln(‘Tujuan : ‘,jurusan);
writeln(‘Jenis Tiket : ‘,jenistiket);
writeln(‘Banyak Tiket Yang Dipesan : ‘,total);
writeln(‘Harga : Rp.’,total*harga:0:0);
gotoxy(17,28);writeln(‘Programed By Yuda Perkasa | [email protected]‘);
readln;
end;
end.
Thanks…
om nu,,,,,,,,,,bantuin ak dong dpt tugas dr dosen ini soalnya
1.buat algoritma menghitung luas dan keliling lingkaran,buat flowchart dan bahasa pemogramaan d pascal
2.buat algoritma mengirim surat (ada 2 orang A dan B)
A ingin mengirim surat yang berisi informasi bahwa B berhasil lulus UMPTN dan A ingin memastikan bahwa inormasi tersebut sampai B
ak lum ngerti ap” om,,cz ak ru masuk kul dan dpt tugas yang ak lum pernah dptn soal ini,,,,,
om bantuin ak yach ni soal buat hr senin,,,
ak ru ktm blognya om,,,klo prlu ak mnt alamat fb om,,,terimakasih banyak om,
Bisa tlong bntuin bkinin aq 1 cntoh cra membuat algoritma, flowchart serta pseudocode nya dari suatu Listing Program g ??????? Pleaaasss, tloong ;)
uses wincrt;
var
Nama Array[1……30] of string
Tugas,Uts,Uas,Absen Array[1……30] of integer
Rata Array[1……30] of real
x,jd byte
Begin
clrscr;
write (‘masukkan jumlah data:’); readln(jd);
for:= 1 to jd do
write (‘xxxxxxxxxxx’);
writeln (‘penilaian ujian mahasiswa STMIK);
writeln (‘input Nama : ‘); readln (nama[x]);
writeln (‘input Nilai Tugas : ‘); readln (tugas[x]);
writeln (‘input Nilai Absen : ‘); readln (absen[x]);
writeln (‘input Nilai Uts : ‘); readln (uts[x]);
writeln (‘input Nilai Uas : ‘); readln (uas[x]);
rata[x]= (0.1*tugas[x])+(0.2*absen[x])+(0.3*uts[x])+(0.4*uas[x]);
End;
clrscr;
for i= 1 to jd do
Begin
writeln (‘xxxxxxxxxx’);
writeln (‘penilaian ujian mahasiswa);
writeln (‘xxxxxxxxxx ‘)
writeln (‘Nama :’,nama [x]);
writeln (‘Nilai Tugas :’,tugas [x]);
writeln (‘Nilai Uts :’,uts [x]);
writeln (‘Nilai Uas :’,uas [x]);
End;
End.
di program ini yang error sellu di bagian ini Nama Array[1……30] of string
clrscr
siang.
sist ak mau minta bantuan nie.
mohon bantuannya iya…
– Buatlah flowchart untuk mendapatkan nilai terkecil dari 2 bilangan yang diinputkan !
– Buatlah flowchart untuk mendapatkan nilai rata-rata dari 3 bilangan yang diinputkan !
mau minta penjelasan flowchart d atas donk….
ass,,,,,,,
bisa nggak di jelaskan itu gambar flowchart karena di suruh sama dosen jelasin flowchart kayak gitu,,,,,,,
tolontg bantu saya membuat flochart konvert antara celcius,reamur, fahrenheit, kelvin, bls gpl,,tolong ya
tolong buatin flowchart/bagan alir tentang perhitungan model matematik (numerik) pembuatan hidrograf atau hidrograf satuan dong.. saya belum ngerti apa2 nih :) balas secepatnya yah…