Протабулюйте функцію z=cos(2x-3y),змвнюючи х на проміжку (0;2) з кроком 0.2,а Y на проміжку (0;1) з кроком 0.1.

перед var x,y,z:real; i:integer;beginx:=0.2;y:=0.1; for i:=1 to 9 do begin;   z:=cos(2*x-3*y);   writeln(z,'=cos(',2*x,'-',3*y,'), при x=',x,' и y=',y);   x:=x+0.2;   y:=y+0.1; end;end. пишет "ожидался конец файла"

все понял,извини

//Pascal ABC.NET v3.0 сборка 1111//В случае, если x принадлежит 0 и 2, а y-0 и 1.var x,y,z:real; i:integer;beginx:=0;y:=0; for i:=1 to 11 do begin;   z:=cos(2*x-3*y);   writeln(z,'=cos(',2*x,'-',3*y,'), при x=',x,' и y=',y);   x:=x+0.2;   y:=y+0.1; end;end.// В случае, если x не принадлежит 0 и 2, а y-0 и 1.var x,y,z:real; i:integer;beginx:=0.2;y:=0.1; for i:=1 to 9 do begin;   z:=cos(2*x-3*y);   writeln(z,'=cos(',2*x,'-',3*y,'), при x=',x,' и y=',y);   x:=x+0.2;   y:=y+0.1; end;end.