Знакомство с языком Паскаль! Помогите!

1)Var x,y:integer begin write('введите x'); readln(x); y=:(формула) ; write(Y); readln; end.2)Program primerVar a,b,s,m,d:integer;Begin ;ReadLn( a,b); s=a+b; m:=a*b; d:=a/b; WriteLn(s); WriteLn(m); WriteLn(d)End3)var x,y1,y2:real;beginread(x);y1:= exp(ln(x)*10);y2:= exp(ln(x)*15);writeln(y1);writeln(y2);end.Вроде так