помогите решить 9, 16, 22, 29 задания на фото

16const n = 0.3; n1=2.5;n2=12;a=2.6;b=0.4;var i,m,t:integer;k,y:real;begink:=n1;for i:=1 to 33 do beginy:= a * k*k + b;writeln(k:5:2, y:9:2);if k <11.80 then k:= k + nelse k:=12; end;end.