Типичные ошибки

var gd, gm : integer; initgraph(gd, gm, ' '); {В разделе описаний - только описания}
writeln(x:integer); {Описание переменной должно быть в блоке var} writeln(x := 2); {Нельзя присваивать переменной значение в аргументе функции} readln(2); {В качестве аргумента должна быть переменная}