Kamis, 28 Oktober 2010

TPW 1.5

program sudut;

uses wincrt;

var
a:Longint;

begin

repeat
ClrScr;
writeln('program mengetahui jenis sudut');
write('masukkan besar sudut[1..180]:');
readln(a);

Permasalahan yang Mengandung "If......then...else"


Mengetahui Jenis Sudut

1.      Memasukkan besar sudut
2.      Jika 0 < besar sudut < 90 maka disebut sudut lancip
3.      Jika besar sudut = 90 maka disebut sudut siku-siku
4.      Jika 90 < besar sudut < 180 maka disebut sudut tumpul
5.      Jika besar sudut = 180 maka disebut sudut berpelurus

Flowchart

Minggu, 10 Oktober 2010

Algoritma dan Flowchart Syarat Mengikuti Pemilu


Syarat-syarat warga negara yang memiliki hak pilih Pemilu
1.      Warga Negara Indonesia (WNI)
2.      Berusia 17 tahun ke atas atau sudah menikah
3.      Terdaftar sebagai calon pemilih
4.      Tidak sedang terganggu jiwanya
5.      Tidak sedang dicabut hak pilihnya berdasarkan keputusan pengadilan yang telah memperoleh hukum tetap

Flowchart