Решить задачу в Паскале ) функция у={ 1)1,5соs^2 2)1,8ax. 3)(x-2)^2+6. 4) 3tgx .Условие x<1. 12. Исходные данные а=2.3 .Диапазон Х принадлежит [0.2;2.8] и дельта Х =0.2

const z = 2.3;var s,d,f,j: real;i:integer;beginj:=0.2;while j < 2.9 dobegins := 1.5*cos(j)*cos(j);writeln(j:4:2 ,s :9:6);j:= j +0.2;end;writeln;j:=0.2;while j < 2.9 dobegins := 1.8*z*j;writeln(j:4:2 ,s :12:6);j:= j +0.2;end;writeln;j:=0.2;while j < 2.9 dobegins := (j-2)*(j-2)+6;writeln(j:4:2 ,s :9:6);j:= j +0.2;end;writeln;j:=0.2;while j < 2.9 dobegins := 3 * sin(j)/cos(j);writeln(j:4:2 ,s :12:6);j:= j +0.2;end; end.