Помогите с информатикой

Разделю строки по цифрам, дабы было легче читать мой ответ:
1) Program z_16b; - название программы, программа имеет название "z_16b"
2) var x, y: integer - описание переменных: в программе будут использованы переменные x и y, которые будут иметь целочисленный тип.
3) begin - начало выполнения действий
4) write ('x>>'); readln (x); - Вывести на экран текст из апострофов, т. е. "x>>" ( т. е., в данном случае как бы "Введите значение переменной x") после чего считать значение переменной x, которое ввел пользователь с клавиатуры.
5) if x<0 then y:=-1 - если x<0, то присвоить значение переменной y: -1, т. е. оператор присваивания := читается как просто = - просто в Паскале такой синтаксис. Т. е. если x<0, то y=(-1).
6) else if x=0 then y:=0; - иначе, если x=0, то y=0;
7) else y:=1; - иначе (во всех остальных случаях, т. е. т. к. все остальное уже расписано, то при x>0) y=1;
8) writeln ('y=', y); - внимание: для начала тут забыта точка с запятой - т. е. программа может не работать, но если она будет поставлена, то тут почти аналогично п. 4: вывести на экран текст "y=" и значение y, которое получено в результате выполнения программы. Например (при вводе в п. 4. 9), будет выведено на экран: y=1.
9) end. - конец программы.