Помогите пожалуйста, пропустила много, непонимаю…

1) var a,b,i: integer; s: real; begina: =2; b: =3; for i: =1 to 30 dobegins: =s+(a/b); b: =b+3; end; Write (s); end.2) var a,b,i: integer; s: real; beginb: =1; for i: =1 to 9 dobegins: =s+(b*b*b); b: =b+3; end; Write (s); end.