diff --git a/rhodecode/public/js/mode/pascal/index.html b/rhodecode/public/js/mode/pascal/index.html --- a/rhodecode/public/js/mode/pascal/index.html +++ b/rhodecode/public/js/mode/pascal/index.html @@ -16,19 +16,19 @@ (* Example Pascal code *) while a <> b do writeln('Waiting'); - -if a > b then + +if a > b then writeln('Condition met') -else +else writeln('Condition not met'); - -for i := 1 to 10 do + +for i := 1 to 10 do writeln('Iteration: ', i:1); - + repeat a := a + 1 until a = 10; - + case i of 0: write('zero'); 1: write('one');