Tahun Kabisat

#include <Constants.au3>

$applName = "Menghitung Tahun Kabisat"
$x = InputBox($applName, "Masukan Tahun ",6)

$y = Mod(Int($x),4)

if ($y=0) Then
    MsgBox($MB_SYSTEMMODAL, $applName, $x & " adalah Tahun Kabisat!")
Else
    MsgBox($MB_SYSTEMMODAL, $applName, $x & " adalah BUKAN Tahun Kabisat!")
EndIf