PROGRAM ARITMATIKA DENGAN FLOWCHART



PROGRAM ARITMATIKA DENGAN FLOWCHART

Program matematika;
 uses wincrt;
 var
 a,b,d,e : integer;
 c:real;
 lagi:char;
 begin
 repeat
 clrscr;
 writeln('PROGRAM OPERASI MATEMATIKA : ');
 writeln('*************************** : ');
 write('masukan angka pertama : ');readln(a);
 write('masukan angka kedua : ');readln(b);
 writeln('pilih operasi : ');
 writeln('Operasi Pengurangan : 1 ');
 writeln('Operasi Penjumlahan : 2 ');
 writeln('Operasi Perkalian : 3 ');
 writeln('Operasi Pembagian : 4 ');
 write('masukan pilihan anda :');read(d);
 if d=1 then
 begin
 c:=(a-b);
 writeln('Hasil dari ',a,' - ',b,' adalah ',c:0:0);
 end;
 if d=2 then
 begin
 c:=(a+b);
 writeln('Hasil dari ',a,' + ',b,' adalah ',c:0:0);
 end; if d=3 then
 begin
 c:=(a*b);
 writeln('Hasil dari ',a,' * ',b,' adalah ',c:0:0);
 end;
 if d=4 then
 begin
 c:=(a/b);
 writeln('Hasil dari ',a,' : ',b,' adalah ',c:0:0);
 end;
 writeln;
 write ('Apakah anda ingin mencoba lagi? (y/n)'); readln (Lagi);
 until Lagi = 'y';
 end.

BERIKUT FLOWCHART PROGRAM DI ATAS


Penulis : Zen Scremo ~ Sebuah blog yang menyediakan berbagai macam informasi

Artikel PROGRAM ARITMATIKA DENGAN FLOWCHART ini dipublish oleh Zen Scremo pada hari Tuesday, December 3, 2013. Semoga artikel ini dapat bermanfaat.Terimakasih atas kunjungan Anda silahkan tinggalkan komentar.sudah ada 0 komentar: di postingan PROGRAM ARITMATIKA DENGAN FLOWCHART
 

0 comments:

Post a Comment

diooda