Skip to content

Instantly share code, notes, and snippets.

@novalagung

novalagung/gist:4057328

Created November 12, 2012 03:26
Show Gist options
  • Save novalagung/4057328 to your computer and use it in GitHub Desktop.
Save novalagung/4057328 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
var
Jenis_Kelamin : String;
Tinggi : integer;
Usia : integer;
Begin
if Jenis_Kelamin = 'pria' then
if tinggi >= 170 and usia >= 18 then
Write("diterima");
Else
Write("tidak diterima");
End;
Else
if tinggi >= 165 and usia >= 17 then
Write("diterima");
Else
Write("tidak diterima");
End;
End;
End.
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment