fork download
  1. /* package whatever; // don't place package name! */
  2.  
  3. import java.util.*;
  4. import java.lang.*;
  5. import java.io.*;
  6.  
  7. /* Name of the class has to be "Main" only if the class is public. */
  8. class Ideone
  9. {
  10. public static void main (String[] args) throws java.lang.Exception
  11. {
  12. // your code goes here
  13. procedure Explode(var Dest: TArrayOfString; Text: String; Separator: String);
  14. var
  15. i: Integer;
  16. begin
  17. i := 0;
  18. repeat
  19. SetArrayLength(Dest, i+1);
  20. if Pos(Separator,Text) > 0 then begin
  21. Dest[i] := Copy(Text, 1, Pos(Separator, Text)-1);
  22. Text := Copy(Text, Pos(Separator,Text) + Length(Separator), Length(Text));
  23. i := i + 1;
  24. end else begin
  25. Dest[i] := Text;
  26. Text := '';
  27. end;
  28. until Length(Text)=0;
  29. end;
  30. }
  31. }
Compilation error #stdin compilation error #stdout 0s 0KB
stdin
Standard input is empty
compilation info
Main.java:13: error: ';' expected
		procedure Explode(var Dest: TArrayOfString; Text: String; Separator: String);
		                 ^
Main.java:13: error: ';' expected
		procedure Explode(var Dest: TArrayOfString; Text: String; Separator: String);
		                          ^
Main.java:13: error: not a statement
		procedure Explode(var Dest: TArrayOfString; Text: String; Separator: String);
		                            ^
Main.java:13: error: not a statement
		procedure Explode(var Dest: TArrayOfString; Text: String; Separator: String);
		                                                  ^
Main.java:13: error: not a statement
		procedure Explode(var Dest: TArrayOfString; Text: String; Separator: String);
		                                                                     ^
Main.java:13: error: ';' expected
		procedure Explode(var Dest: TArrayOfString; Text: String; Separator: String);
		                                                                           ^
Main.java:15: error: ';' expected
	i: Integer;
	 ^
Main.java:15: error: not a statement
	i: Integer;
	   ^
Main.java:17: error: ';' expected
	i := 0;
	 ^
Main.java:19: error: ';' expected
		SetArrayLength(Dest, i+1);
		              ^
Main.java:19: error: not a statement
		SetArrayLength(Dest, i+1);
		               ^
Main.java:19: error: ';' expected
		SetArrayLength(Dest, i+1);
		                   ^
Main.java:19: error: not a statement
		SetArrayLength(Dest, i+1);
		                      ^
Main.java:19: error: ';' expected
		SetArrayLength(Dest, i+1);
		                        ^
Main.java:20: error: '(' expected
		if Pos(Separator,Text) > 0 then	begin
		  ^
Main.java:20: error: ')' expected
		if Pos(Separator,Text) > 0 then	begin
		                          ^
Main.java:20: error: not a statement
		if Pos(Separator,Text) > 0 then	begin
		                           ^
Main.java:20: error: ';' expected
		if Pos(Separator,Text) > 0 then	begin
		                               ^
Main.java:21: error: ']' expected
			Dest[i] := Copy(Text, 1, Pos(Separator, Text)-1);
			     ^
Main.java:21: error: illegal start of expression
			Dest[i] := Copy(Text, 1, Pos(Separator, Text)-1);
			      ^
Main.java:21: error: ';' expected
			Dest[i] := Copy(Text, 1, Pos(Separator, Text)-1);
			       ^
Main.java:21: error: illegal start of expression
			Dest[i] := Copy(Text, 1, Pos(Separator, Text)-1);
			         ^
Main.java:21: error: ';' expected
			Dest[i] := Copy(Text, 1, Pos(Separator, Text)-1);
			               ^
Main.java:21: error: not a statement
			Dest[i] := Copy(Text, 1, Pos(Separator, Text)-1);
			                ^
Main.java:21: error: ';' expected
			Dest[i] := Copy(Text, 1, Pos(Separator, Text)-1);
			                    ^
Main.java:21: error: not a statement
			Dest[i] := Copy(Text, 1, Pos(Separator, Text)-1);
			                                             ^
Main.java:21: error: ';' expected
			Dest[i] := Copy(Text, 1, Pos(Separator, Text)-1);
			                                               ^
Main.java:22: error: illegal start of expression
			Text := Copy(Text, Pos(Separator,Text) + Length(Separator), Length(Text));
			      ^
Main.java:23: error: illegal start of expression
			i := i + 1;
			   ^
Main.java:24: error: not a statement
		end else begin
		^
Main.java:24: error: ';' expected
		end else begin
		   ^
Main.java:24: error: 'else' without 'if'
		end else begin
		    ^
Main.java:25: error: ']' expected
			 Dest[i] := Text;
			      ^
Main.java:25: error: illegal start of expression
			 Dest[i] := Text;
			       ^
Main.java:25: error: ';' expected
			 Dest[i] := Text;
			        ^
Main.java:25: error: illegal start of expression
			 Dest[i] := Text;
			          ^
Main.java:26: error: illegal start of expression
			 Text := '';
			       ^
Main.java:26: error: empty character literal
			 Text := '';
			         ^
Main.java:26: error: unclosed character literal
			 Text := '';
			          ^
Main.java:28: error: ';' expected
	until Length(Text)=0;
	            ^
Main.java:28: error: not a statement
	until Length(Text)=0;
	             ^
Main.java:28: error: ';' expected
	until Length(Text)=0;
	                 ^
Main.java:29: error: not a statement
end;
^
43 errors
stdout
Standard output is empty