Course Sintaks Java - Lecture: Gelung dari Planet Pascal

"Hai, kawan. Bilaabo akan memberitahu anda bagaimana semua ini akan kelihatan dalam Pascal."

Pascal

i := 3;
While i >= 0 Do
Begin 
    WriteLn(i);
    i := i - 1;
End;

Jawa

int i = 3;
while (i >= 0)
{
    System.out.println(i);
    i--;
}

Pascal

i := 0;
While i < 3 Do
Begin 
    WriteLn(i);
    i := i + 1;
End;

Jawa

int i = 0;
while (i < 3)
{
    System.out.println(i);
    i++;
}

Pascal

isExit := False;
While Not isExit Do
Begin
    ReadLn(s);
    isExit :=  (s = 'exit');
End;

Jawa

boolean isExit = false;
while (!isExit)
{
    String s = buffer.readLine();
    isExit = s.equals("exit");
}

Pascal

While True Do
    WriteLn('C');

Jawa

while (true)
    System.out.println('C');

Pascal

While True Do
Begin
    ReadLn(s);
    If  s = 'exit' Then 
        Break;
End;

Jawa

while (true) 
{
    String s = buffer.readLine();
    if (s.equals("exit")) 
        break;    
}

"Perbandingan ini dengan Pascal mungkin berguna untuk mereka yang mengenali Pascal."

"Maksud awak tidak? Jom! Ini bahasa paling popular di planet asal saya."

"OK, OK. Saya percaya anda bahawa ia bagus. Dan jika saya tahu, ia akan membantu saya."