program ideone;var c:longInt;d:longInt;beginc:=$1;d:=$0; if (((c >> d) & $1) == 1) then begin writeln ( 'mallesh');end.
Standard input is empty
prog.pas: In main program: prog.pas:10: error: syntax error before `>'
Standard output is empty
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!