procedure main();write(!read());end