Помогите решить в паскале и матлабе w=cos(2*x) диапозон от 1 до 2 шаг 0,1

program func;
begin
writeln( cos( 2 * 1.0 ),' = ', -0.42,);
writeln( cos( 2 * 1.1 ),' = ', -0.59,);
writeln( cos( 2 * 1.2 ),' = ', -0.74,);
writeln( cos( 2 * 1.3 ),' = ', -0.86,);
writeln( cos( 2 * 1.4 ),' = ', -0.94,);
writeln( cos( 2 * 1.5 ),' = ', -0.99,);
writeln( cos( 2 * 1.6 ),' = ', -1.00,);
writeln( cos( 2 * 1.7 ),' = ', -0.97,);
writeln( cos( 2 * 1.8 ),' = ', -0.90,);
writeln( cos( 2 * 1.9 ),' = ', -0.79,);
writeln( cos( 2 * 2.0 ),' = ', -0.65,);
end.