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

1) Var x,y:integer begin write('введите x'); readln(x); y=:(формула) ; write(Y); readln; end. 2) Program primer Var 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) End 3) var x,y1,y2:real; begin read(x); y1:= exp(ln(x)*10); y2:= exp(ln(x)*15);writeln(y1); writeln(y2); end. Вроде так