Var X: Integer;Begin For X := 0 To 100 Do if (X = 0 or 7 or 8 or 10) Then Writeln(X);End.
Standard input is empty
15
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!