Rabu, 10 April 2013

menentukan bil positif atau negatif

Apa itu bilangan positif dan negatif ?
     positif adalah bilangan yang lebih besar dari pada nol (0) : {1,2,3,...)
     negatif adalah bilangan yang lebih kecil dari pada nol (0) : {-1,-2, -3,...}

1. Algoritma Flowchart Menentukan Bilangan Positif atau Negatif
       

sumber : http://nurfitrianti-23.blogspot.com/2012/08/menentukan-bilangan-positif-atau-negatif.html


2. Algoritma Turbo Pascal

Program bilangan_positif;
Uses wincrt;
Var
     angka,hasil:integer;
Begin
     writeln(' menentukan bilangan positif dan negatif');
     writeln('masukan angka : ');read(angka);
     if angka >=0 then writeln (angka, 'adalah bilangan POSITIF')
     else writeln(angka, 'adalah bilangan NEGATIF');
end.
    

Tidak ada komentar:

Poskan Komentar