10 lines
241 B
Plaintext
10 lines
241 B
Plaintext
|
begin:
|
||
|
|
TextWindow.Write("Enter a number: ")
|
||
|
|
num = TextWindow.ReadNumber()
|
||
|
|
remainder = Math.Remainder(num, 2)
|
||
|
|
If (remainder = 0) Then
|
||
|
|
TextWindow.WriteLine("The number is Even")
|
||
|
|
Else
|
||
|
|
TextWindow.WriteLine("The number is Odd")
|
||
|
|
EndIf
|
||
|
|
Goto begin
|