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 DIATAS
How to get a HIIT workout in your kitchen with a
ReplyDeleteStep 1: Go to the top of the house, and search for ingredients and food. titanium muzzle brake · titanium septum jewelry Step 2: Next, go to the stainless steel vs titanium apple watch kitchen mokume gane titanium counter and pull out the zinc oxide and titanium dioxide sunscreen box for a
vm512 jordan 1 high,yeezy 350 static,jordan 11,jordan 1 og,jordan 1 university blue,jordan 12 retro,jordan 11,jordan 1 travis scott,jordan 12 retro
ReplyDelete