все просто написана программа верно,но для того чтобы она заработала нужно символы расставить а именно( ; )где ?? после writeln и readln
