В 2_1 есть ошибки. Вот верный код:
Код
for i:=0 to 10 do
begin
x:=i*0,5;
y:=x*x*x + 2*sqr(sin(sqr(x+3)));
writeln ('x=', x:6:2, 'y=', y:6:2);
writeln (LST, 'x=', x:6:2, 'y=',y:6:2);
end;


for i:=0 to 10 do - мы ведь пробегаем 10 значений, от 0*0.5 до 10*0.5

x:=i*0,5; - должно быть в начале цикла и с точкой с запятой после выражения.

y:=x*x*x + 2*sqr(sin(sqr(x+3))); - добавлен символ умножения.