program { int pascal, basic=1; real unix = -1.0, c = 1; if (c == unix) read (pascal); else { c = unix + basic - c*c; read (pascal); } write (pascal," ",c," ",c + 0.5); continue; }